(((-I)*Csc[theta]* (((r^2*(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)*Cos[phi]*Sin[2*theta])* ((-1.*^-12*Sin[phi]*Sin[theta]*((((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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* Cos[phi]*Sin[2*theta] - 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*Cos[phi]^2*Sin[2*theta]^ 2))/2 - 2.5*^-13*(-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* ((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)*Cos[theta]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta]) + 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)*((-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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*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)*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]) + 1.*^-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]* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta])))* (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*Cos[phi]* (-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)* Cos[theta]*Sin[phi]^2*Sin[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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + Cos[phi]* (-4.*^-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[phi]*Cos[2*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)*Sin[2*theta] + 1.*^-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[phi]^2* (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)*Cos[theta]*Sin[theta]^3 + 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)* Sin[4*theta])) - 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)* (-12*((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)* Sin[phi]^2*Sin[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)*(4*Sin[phi]^2* Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*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)*(12*((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)*Sin[phi]^2*Sin[theta]^2* (-1 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)* ((-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[phi]* (4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]))))/((4 - 1.*^-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*Sin[phi]^2* Sin[theta]^2 - 2.1599999999999998*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 7.5*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 2.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))* (8 - 2.*^-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*Sin[phi]^2*Sin[theta]^2 - 4.3199999999999997*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 7.2*^-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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 4.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - (1.*^-6*Sin[phi]*Sin[theta]* ((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)^2*Cos[phi]* (Cos[theta] + Cos[3*theta]) + 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)* ((-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[phi]*(Cos[theta] + Cos[3*theta]) + 1.5*^-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)* ((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)*Cos[phi]*Sin[theta]*Sin[2*theta]* (1 - 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)* Cos[phi]*Sin[2*theta]) + 1.5*^-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)*((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)*Cos[phi]* Sin[theta]*Sin[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)*Cos[phi]*Sin[2*theta]) + 0.000018*((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* Cos[phi]*Sin[theta]*Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta]) + 6*((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)*Sin[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]) + (((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 + 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)* Cos[phi]*Sin[2*theta] - 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*Cos[phi]^2*Sin[2*theta]^ 2))/2 + 2.5*^-13*((-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*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta]) + 2.5*^-13*(-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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*((-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]*(4*Cos[theta]*Sin[phi]^2* Sin[theta] + Cos[phi]^2*Sin[4*theta]) - 2.5*^-13* (-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)*((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)*Cos[theta]*(4*Cos[theta]*Sin[phi]^2* Sin[theta] + Cos[phi]^2*Sin[4*theta]) - 2.5*^-13* (-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* ((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)*Cos[theta]* (4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*theta]) + 3.*^-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* ((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)*Cos[theta]* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta]) + 3.*^-12*((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)*((-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[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]) - 3.*^-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)*((-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]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]) - 3.*^-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)*(-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]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta]))*(4 - 1.*^-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*Sin[phi]^2*Sin[theta]^2 - 2.1599999999999998*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 7.5*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 2.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) - 1.*^-12* ((((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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*Cos[phi]*Sin[2*theta] - 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* Cos[phi]^2*Sin[2*theta]^2))/2 - 2.5*^-13* (-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*((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)*Cos[theta]* (4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*theta]) + 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)* ((-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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]*Sin[phi]^2* Sin[theta] + Cos[phi]^2*Sin[4*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)* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]) + 1.*^-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]* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta])))* (-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)*((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[phi]^2*Sin[theta]^2 - 7.5*^-7* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*((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)*Cos[phi]*Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^3 - 0.000648* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*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*(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[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - (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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]))/4 - (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)* ((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]))/4 - ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*((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)*Cos[phi]^2*Sin[2*theta]^2)/2 + 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* ((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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^ 3 + Cos[phi]^2*Sin[2*theta]^3) + 72*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*(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)*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^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)^2*Cos[phi]* ((((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*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*theta]))/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*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)* ((-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[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))))/ (-4 + 1.*^-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*Sin[phi]^2*Sin[theta]^2 + 2.1599999999999998*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 7.5*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 - 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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 2.*^-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))^ 2 - (5.*^-13*Sin[phi]*Sin[theta]* ((((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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*Cos[phi]*Sin[2*theta] - 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* Cos[phi]^2*Sin[2*theta]^2))/2 - 2.5*^-13* (-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* ((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)*Cos[theta]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta]) + 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)*((-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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*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)*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]) + 1.*^-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]* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta])))* ((-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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (4 - 1.*^-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*Sin[phi]^2*Sin[theta]^2 - 2.1599999999999998*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 7.5*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 2.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) - (1.25*^-13*Sin[phi]*Sin[theta]*(4*Cos[phi]*Cos[2*theta] + 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)* (2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*((-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) + ((-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)*Sin[theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Cos[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - 1.*^-6*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Sin[theta]^2* (-2.5*^-13*((-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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))^2 - (5.*^-13*Sin[phi]^2*Sin[theta]*((((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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* Cos[phi]*Sin[2*theta] - 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*Cos[phi]^2*Sin[2*theta]^ 2))/2 - 2.5*^-13*(-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* ((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)*Cos[theta]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta]) + 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)*((-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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*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)*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]) + 1.*^-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]* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta])))* ((-2.5*^-7*((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)*Cos[phi]*Csc[theta]*Sin[2*theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*((-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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (4 - 1.*^-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*Sin[phi]^2*Sin[theta]^2 - 2.1599999999999998*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 7.5*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 2.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) - 2.5*^-13*Sin[phi]^2*Sin[theta]*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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) + ((-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)*Sin[theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Cos[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 5.*^-7*((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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta]))* (-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[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)*Cos[2*theta] + (((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.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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) + ((-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)*Cos[phi]*Sin[2*theta]* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))* (-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[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)*Cos[2*theta] + (((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.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2 - (1.*^-6* (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) + ((-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)/2)*Sin[phi]^2* Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)*((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]*(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)*Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Cos[phi]^2*Sin[2*theta]* (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)*((-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[phi]*Cos[2*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)*Sin[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)*Cos[phi]*Sin[2*theta]))/ 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)* Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (1.*^-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)*Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[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)* Cos[2*theta] + (((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))/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (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)^2*Cos[theta]* Sin[phi]^2*Sin[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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (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)* ((-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]*Sin[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (1.9999999999999998*^-18*(-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]*Sin[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (-3.75*^-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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^3 + 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* Cos[phi]*(-18*((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]*Sin[phi]^2*Sin[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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(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)* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - (((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 4.*^-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[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])))/4 + 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)*((((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2)/4 - 12*((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)* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)*((-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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*((-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[phi]^2*Cos[2*theta]^2 + Cos[theta]^2* Sin[phi]^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)* Cos[phi]*((((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*Cos[theta]^3*Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] - Sin[phi]^2* Sin[4*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*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))^ 2)) + 1.*^-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[phi]*Cos[2*theta]* ((-5.*^-13*r*Sin[phi]*Sin[theta]*((((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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* Cos[phi]*Sin[2*theta] - 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*Cos[phi]^2*Sin[2*theta]^ 2))/2 - 2.5*^-13*(-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* ((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)*Cos[theta]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta]) + 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)*((-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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*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)*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]) + 1.*^-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]* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta])))* ((-2.5*^-7*(-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)* ((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)*Cos[phi]*Sin[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (4 - 1.*^-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*Sin[phi]^2*Sin[theta]^2 - 2.1599999999999998*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 7.5*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 2.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) - 2.5*^-13*r*Sin[phi]*Sin[theta]*((-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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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) + ((-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)*Sin[theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Cos[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 2.5*^-13*r*Sin[phi]*Sin[theta]*((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)*((-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[phi]*Cos[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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) + ((-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)*Sin[theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Cos[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 5.*^-7*r*Sin[phi]*Sin[theta]*((1.*^-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)* (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) + ((-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)*Sin[theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]*Sin[phi]^2*Sin[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)* Cos[2*theta] + (((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.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* 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)*Cos[theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[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)*Cos[2*theta] + (((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.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* 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)*(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) + ((-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)*Sin[theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)/2)*Sin[theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*Cos[theta]*(2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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) + ((-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)*Sin[phi]^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) + ((-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)*Cos[phi]*Sin[2*theta]*(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)*Cos[phi]*Sin[2*theta]) + (((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)*Cos[phi]* Sin[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))/4))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (((-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]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Sin[theta]*(-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) + ((-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)*Cos[theta]*Sin[phi]^2*Sin[theta] - 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) + ((-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)*Cos[phi]^2*Sin[4*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (1.*^-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)* (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) + ((-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)*Cos[phi]^2*Sin[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)* Cos[2*theta] + (((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)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (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*((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)/4)*Cos[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (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) + ((-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)/4)*Cos[phi]* Sin[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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (1.9999999999999998*^-18*(-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) + ((-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)*Cos[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta]*(-3.75*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^3 + 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* Cos[phi]*(-18*((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]*Sin[phi]^2*Sin[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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(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)* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - (((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 4.*^-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[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])))/4 + 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)*((((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2)/4 - 12*((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)* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)*((-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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*((-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[phi]^2*Cos[2*theta]^2 + Cos[theta]^2* Sin[phi]^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)* Cos[phi]*((((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*Cos[theta]^3*Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] - Sin[phi]^2* Sin[4*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*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))^2)))/ (Sqrt[2]*r) - (I*Csc[theta]*(-1.*^-6*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Sin[theta]^2* ((-1.*^-12*Sin[phi]*Sin[theta]*((((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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* Cos[phi]*Sin[2*theta] - 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*Cos[phi]^2*Sin[2*theta]^ 2))/2 - 2.5*^-13*(-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* ((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)*Cos[theta]*(4*Cos[theta]*Sin[phi]^2* Sin[theta] + Cos[phi]^2*Sin[4*theta]) + 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)* ((-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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]*Sin[phi]^2* Sin[theta] + Cos[phi]^2*Sin[4*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)* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]) + 1.*^-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]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta])))*(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*Cos[phi]* (-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)* Cos[theta]*Sin[phi]^2*Sin[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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + Cos[phi]* (-4.*^-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[phi]*Cos[2*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)*Sin[2*theta] + 1.*^-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[phi]^2* (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)*Cos[theta]* Sin[theta]^3 + 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)* Sin[4*theta])) - 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)* (-12*((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)* Sin[phi]^2*Sin[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)*(4*Sin[phi]^2* Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*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)* (12*((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)* Sin[phi]^2*Sin[theta]^2*(-1 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)* ((-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[phi]* (4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]))))/((4 - 1.*^-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*Sin[phi]^2* Sin[theta]^2 - 2.1599999999999998*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 7.5*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 2.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))*(8 - 2.*^-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*Sin[phi]^2*Sin[theta]^2 - 4.3199999999999997*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 7.2*^-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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 4.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))) - (1.*^-6*Sin[phi]*Sin[theta]*((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)^2*Cos[phi]*(Cos[theta] + Cos[3*theta]) + 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)*((-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[phi]* (Cos[theta] + Cos[3*theta]) + 1.5*^-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)*((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)*Cos[phi]* Sin[theta]*Sin[2*theta]*(1 - 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)*Cos[phi]*Sin[2*theta]) + 1.5*^-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)* ((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)*Cos[phi]*Sin[theta]*Sin[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)* Cos[phi]*Sin[2*theta]) + 0.000018*((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*Cos[phi]*Sin[theta]* Sin[2*theta]*(-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)*Cos[phi]* Sin[2*theta]) + 6*((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)*Sin[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]) + (((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 + 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)* Cos[phi]*Sin[2*theta] - 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*Cos[phi]^2*Sin[2*theta]^ 2))/2 + 2.5*^-13*((-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*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta]) + 2.5*^-13*(-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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*((-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]*(4*Cos[theta]*Sin[phi]^2* Sin[theta] + Cos[phi]^2*Sin[4*theta]) - 2.5*^-13* (-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)*((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)*Cos[theta]*(4*Cos[theta]*Sin[phi]^2* Sin[theta] + Cos[phi]^2*Sin[4*theta]) - 2.5*^-13* (-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* ((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)*Cos[theta]* (4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*theta]) + 3.*^-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*((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)*Cos[theta]* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta]) + 3.*^-12*((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)*((-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[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]) - 3.*^-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)*((-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]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]) - 3.*^-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)*(-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]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta]))*(4 - 1.*^-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*Sin[phi]^2*Sin[theta]^2 - 2.1599999999999998*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 7.5*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 2.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]))) - 1.*^-12*((((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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* Cos[phi]*Sin[2*theta] - 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*Cos[phi]^2*Sin[2*theta]^ 2))/2 - 2.5*^-13*(-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*((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)*Cos[theta]*(4*Cos[theta]*Sin[phi]^2* Sin[theta] + Cos[phi]^2*Sin[4*theta]) + 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)*((-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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*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)*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]) + 1.*^-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]* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta])))* (-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)*((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[phi]^2*Sin[theta]^2 - 7.5*^-7* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*((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)*Cos[phi]*Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^3 - 0.000648* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*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*(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[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - (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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]))/4 - (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)* ((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]))/4 - ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*((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)*Cos[phi]^2*Sin[2*theta]^2)/2 + 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* ((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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^ 3 + Cos[phi]^2*Sin[2*theta]^3) + 72*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*(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)*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^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)^2*Cos[phi]* ((((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*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*theta]))/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*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)* ((-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[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))))/(-4 + 1.*^-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*Sin[phi]^2* Sin[theta]^2 + 2.1599999999999998*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 7.5*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 - 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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 2.*^-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))^2 - (5.*^-13*Sin[phi]*Sin[theta]*((((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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* Cos[phi]*Sin[2*theta] - 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*Cos[phi]^2*Sin[2*theta]^ 2))/2 - 2.5*^-13*(-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* ((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)*Cos[theta]*(4*Cos[theta]*Sin[phi]^2* Sin[theta] + Cos[phi]^2*Sin[4*theta]) + 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)* ((-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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]*Sin[phi]^2* Sin[theta] + Cos[phi]^2*Sin[4*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)* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]) + 1.*^-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]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta])))*((-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) + ((-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)*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/(4 - 1.*^-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*Sin[phi]^2* Sin[theta]^2 - 2.1599999999999998*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 7.5*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 2.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]))) - (1.25*^-13*Sin[phi]*Sin[theta]*( 4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*((-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) + ((-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)*Sin[theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*Cos[theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - (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) + ((-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)*Cos[phi]* Sin[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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + r^2*Sin[theta]^2* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])* (-2.5*^-13*((-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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))))^2 - (5.*^-13*Sin[phi]^2*Sin[theta]*( (((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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*Cos[phi]*Sin[2*theta] - 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* Cos[phi]^2*Sin[2*theta]^2))/2 - 2.5*^-13* (-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*((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)*Cos[theta]* (4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*theta]) + 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)*((-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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*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)*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]) + 1.*^-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]* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta])))*( (-2.5*^-7*((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)*Cos[phi]*Csc[theta]*Sin[2*theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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) + ((-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)*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (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)*((-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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/(4 - 1.*^-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*Sin[phi]^2* Sin[theta]^2 - 2.1599999999999998*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 7.5*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 2.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]))) - 2.5*^-13*Sin[phi]^2*Sin[theta]* ((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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) + ((-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)*Sin[theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Cos[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 5.*^-7*((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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta]))* (-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[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)*Cos[2*theta] + (((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.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]* (Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]*Sin[phi]^2*Sin[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)* Cos[2*theta] + (((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.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]* (Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^2 - (1.*^-6* (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) + ((-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)/2)*Sin[phi]^2* Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Sin[phi]^2* Sin[theta]*(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)*((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]*(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)*Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Cos[phi]^2* Sin[2*theta]*(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)* ((-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[phi]*Cos[2*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)*Sin[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)*Cos[phi]*Sin[2*theta]))/ 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)* Sin[2*theta]*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (1.*^-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)*Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[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)* Cos[2*theta] + (((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))/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (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)^2*Cos[theta]* Sin[phi]^2*Sin[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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (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)* ((-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]*Sin[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (1.9999999999999998*^-18*(-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]*Sin[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (-3.75*^-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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^3 + 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* Cos[phi]*(-18*((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]*Sin[phi]^2*Sin[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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(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)* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - (((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 4.*^-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[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[ theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))/4 + 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)*((((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2)/4 - 12*((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)* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)*((-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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*((-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[phi]^2*Cos[2*theta]^2 + Cos[theta]^2* Sin[phi]^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)* Cos[phi]*((((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*Cos[theta]^3* Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*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*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])))))/(-2 + 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))^2)) - 1.*^-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[phi]*Sin[theta]* ((-5.*^-13*r*Sin[phi]*Sin[theta]*((((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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* Cos[phi]*Sin[2*theta] - 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*Cos[phi]^2*Sin[2*theta]^ 2))/2 - 2.5*^-13*(-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* ((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)*Cos[theta]*(4*Cos[theta]*Sin[phi]^2* Sin[theta] + Cos[phi]^2*Sin[4*theta]) + 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)* ((-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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]*Sin[phi]^2* Sin[theta] + Cos[phi]^2*Sin[4*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)* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]) + 1.*^-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]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta])))*((-2.5*^-7*(-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)* ((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)*Cos[phi]*Sin[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*Cos[phi]*Cos[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - (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) + ((-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)*Sin[phi]^2* 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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/(4 - 1.*^-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*Sin[phi]^2* Sin[theta]^2 - 2.1599999999999998*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 7.5*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 2.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]))) - 2.5*^-13*r*Sin[phi]*Sin[theta]* ((-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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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) + ((-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)*Sin[theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Cos[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 2.5*^-13*r*Sin[phi]*Sin[theta]*((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)*((-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[phi]*Cos[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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) + ((-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)*Sin[theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Cos[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 5.*^-7*r*Sin[phi]*Sin[theta]*((1.*^-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)* (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) + ((-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)*Sin[theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]*Sin[phi]^2*Sin[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)* Cos[2*theta] + (((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.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]* (Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*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)*Cos[theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[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)*Cos[2*theta] + (((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.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]* (Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*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)* (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) + ((-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)*Sin[theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)/2)*Sin[theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*Cos[theta]*(2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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) + ((-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)*Sin[phi]^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) + ((-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)*Cos[phi]* Sin[2*theta]*(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)*Cos[phi]* Sin[2*theta]) + (((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)*Cos[phi]* Sin[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))/4))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (((-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]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Sin[theta]*(-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) + ((-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)*Cos[theta]* Sin[phi]^2*Sin[theta] - 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) + ((-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)*Cos[phi]^2* Sin[4*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (1.*^-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)* (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) + ((-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)*Cos[phi]^2*Sin[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)* Cos[2*theta] + (((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)*Sin[2*theta])/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (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*((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)/4)*Cos[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (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) + ((-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)/4)*Cos[phi]* Sin[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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (1.9999999999999998*^-18*(-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) + ((-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)*Cos[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta]*(-3.75*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^3 + 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* Cos[phi]*(-18*((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]*Sin[phi]^2*Sin[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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(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)* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - (((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 4.*^-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[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[ theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))/4 + 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)*((((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2)/4 - 12*((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)* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)*((-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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*((-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[phi]^2*Cos[2*theta]^2 + Cos[theta]^2* Sin[phi]^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)* Cos[phi]*((((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*Cos[theta]^3* Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*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*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])))))/(-2 + 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))^2))))/(Sqrt[2]*r))/2 + ((I*Csc[theta]*(r^2*Sin[theta]^2*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])*((2.5*^-7*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*((1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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]*Sin[phi]^2* Sin[2*theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (Csc[theta]* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))*(Cos[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)*Cos[phi]*Sin[3*theta] + 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)*Cos[phi]*Sin[3*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (1.*^-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)*Sin[phi]^2* (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)*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 - 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*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) + (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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/(r*(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))) + (2.5*^-13*Sin[phi]^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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Sin[2*theta]* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta]))*(-Cos[theta] - 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)*Cos[phi]*(-2*Sin[theta] + Sin[3*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)*Cos[phi]* (-Sin[theta] + Sin[3*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*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)*Cos[phi]*Cos[theta] + Sin[theta]*(1 - 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)* Cos[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]*Cos[theta]* Sin[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)*Cos[phi]*Sin[2*theta] + 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)*Cos[phi]*Sin[2*theta])))/(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))))*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*Cot[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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*Cos[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/r + (2.5*^-7*((-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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))))*((1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (3.*^-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)* (-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/r - (2.5*^-13*Sin[phi]^2*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* Cos[theta]^2*Sin[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)* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2* Sin[theta]^2)/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)^2* Cos[theta]*(-1.*^-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]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* ((-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*(-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 + 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)*Cos[phi]*Sin[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)*Cos[theta]* (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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*theta])/2))))*( (-2.5*^-7*((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)*Cos[phi]*Csc[theta]*Sin[2*theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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) + ((-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)*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (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)*((-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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/(r*(1 - 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))) - (2.5*^-13*Sin[phi]^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)* (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[theta]^2* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)* Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))))*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*Cot[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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*Cos[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/r - (2.5*^-7*((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)*((-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[phi]*Cos[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))))*((1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (3.*^-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)* (-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/r + (5.*^-7*((-1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta]))* (-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[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)*Cos[2*theta] + (((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.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 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) + ((-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)*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]* (Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[ 2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^ 2 + ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta] - 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]*Sin[phi]^2*Sin[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)* Cos[2*theta] + (((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.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]* (Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[ 2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^ 2 + (1.*^-6*((-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 + 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) - (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 + 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) + ((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)/2))*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)* ((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Sin[2*theta] - 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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - (Cos[phi]* (2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta])*(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)* ((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + ((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) + ((-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 + 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) + ((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))*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*Sin[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*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)*((-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[phi]^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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))) + (6.*^-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)*(-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[phi]*Sin[phi]^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)*Cos[2*theta] + (((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)* Sin[2*theta])/(-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))) - (5.999999999999999*^-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)* (-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta]*(3.75*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]* Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^3 - 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* Cos[phi]*(-18*((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]*Sin[phi]^2*Sin[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)*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + 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/4*(((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^ 2) + 12*((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)* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2) - 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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*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)*(-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)* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (1 + 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)* Cos[phi]*Sin[2*theta]) + (((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*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)* Cos[phi]*Sin[2*theta]))/4 + 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)* ((-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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*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)* (4*((-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[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*(2*Cos[phi]^3*Cos[2*theta]^ 2*Sin[2*theta] + Cos[phi]*Sin[phi]^2*Sin[ 4*theta]) + (((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*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))/4))))/(-2 + 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))^2))/r + (5.*^-7*(Cos[phi]*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)* Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 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)* Cos[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]* Sin[2*phi]*Sin[4*theta])))) + 1.*^-6*Sin[phi]* ((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)* ((-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*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]* Cos[2*theta]*Sin[phi]*Sin[2*theta])/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 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)*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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]*Sin[phi]*(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)* Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*Cot[theta]*Sin[phi]*Sin[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)* Cos[phi]*Sin[2*theta]))/(4*(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 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)*((-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)*Cot[theta]*Sin[phi]*Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))) + (6.*^-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)* Cos[phi]*Sin[phi]*(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)*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)*Sin[theta]^2)/2)*Sin[2*theta])/(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^ 2 + 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^ 3)) + 1.*^-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*(-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2* Sin[phi]^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)*Cos[phi]*(-2*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*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)* (-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[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]* Sin[2*phi]*Sin[4*theta]))) - (3.*^-12* ((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)*Cos[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta]* (-(Sin[phi]*Sin[theta]^2*(-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)^2*Cos[phi]*Sin[theta]^ 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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*Sin[theta]*(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)*Cos[theta]*(2 - 6*Cos[2*phi] + 3*Cos[2*(phi - theta)] + 6*Cos[ 2*theta] + 3*Cos[2*(phi + theta)]) + 16*Cos[phi]* Sin[theta]))/2 - 0.000054*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*(1 + 3*Cos[2*phi])* Sin[2*theta] + 9*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(8*Cos[phi]*(1 + 2*Cos[2*theta]) - 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)*(2 - 6*Cos[2*phi] + 3*Cos[2*(phi - theta)] + 6*Cos[2*theta] + 3*Cos[2*(phi + theta)])*Sin[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)^2*(4*(1 + 2*Cos[2*theta])* Sin[2*phi]*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)*Sin[phi]*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*Sin[phi]*(8*Cos[theta]^3*Sin[phi]^2*Sin[theta] + 4*Cos[2*phi]*Sin[4*theta] + Cos[phi]^2* (-7*Sin[2*theta] + 2*Sin[4*theta] - 3*Sin[ 6*theta])))))/(-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 3.75*^-13*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^ 2 + 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^ 3)) + 1.*^-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*(2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2* Sin[phi]^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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[ 4*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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*Cos[2*theta]*Sin[phi]*(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)* Cos[phi]*Sin[2*theta])*(1.*^-6*(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)^3* (1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^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)^2*Cos[phi]*Sin[theta]^4)/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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(-8*Cos[phi]*Sin[theta]^ 4 + 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)*(4*(1 + 3*Cos[2*phi])* Cos[theta]*Sin[theta]^3 - 3*Cos[phi]^2*Sin[2*theta]^ 3)))/4 + 9*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (-2*Cos[phi]*(1 + 2*Cos[2*theta])*Sin[theta]^2 + 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)*(-4*(1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^3 + 3*Cos[phi]^2*Sin[2*theta]^3))) + 2.5*^-7* (-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*(8*Cos[phi]*(1 + 2*Cos[2*theta])*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)*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 2*Sin[phi]^2*Sin[4*theta] + Cos[phi]^2* (-7*Sin[2*theta] + 6*Sin[4*theta] - 3*Sin[ 6*theta])))))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*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)*Cot[theta]*Sin[phi]* (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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])*(1.*^-6*(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)^3*(1 + 3*Cos[2*phi])* Cos[theta]*Sin[theta]^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)^2*Cos[phi]*Sin[theta]^4)/ 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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*(-8*Cos[phi]*Sin[theta]^4 + 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)*(4*(1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^3 - 3*Cos[phi]^2*Sin[2*theta]^3)))/4 + 9*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (-2*Cos[phi]*(1 + 2*Cos[2*theta])*Sin[theta]^2 + 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)*(-4*(1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^3 + 3*Cos[phi]^2*Sin[2*theta]^3))) + 2.5*^-7* (-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*(8*Cos[phi]*(1 + 2*Cos[2*theta])*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)*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 2*Sin[phi]^2*Sin[4*theta] + Cos[phi]^2* (-7*Sin[2*theta] + 6*Sin[4*theta] - 3*Sin[ 6*theta])))))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^ 2)))/r) - 1.*^-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[phi]*Sin[theta]* ((1.25*^-13*Sin[phi]*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*((2.5*^-7*(-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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*Sin[2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]*Cos[2*theta]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*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)*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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*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) - (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)*Sin[theta]^2)* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (Cos[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)*Cos[phi]*Sin[3*theta] + 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)*Cos[phi]*Sin[3*theta]))/(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]))) - (2.5*^-13*Sin[phi]*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* Cos[theta]^2*Sin[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)* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2* Sin[theta]^2)/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)^2* Cos[theta]*(-1.*^-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]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* ((-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*(-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 + 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)*Cos[phi]*Sin[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)*Cos[theta]* (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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*theta])/2))))*( (-2.5*^-7*(-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)*((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)*Cos[phi]* Sin[2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]*Cos[2*theta]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*Cos[phi]*Cos[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - (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) + ((-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)*Sin[phi]^2* 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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/(1 - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]))) + 2.5*^-7*Sin[phi]*Sin[theta]* ((1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta] - 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (3.*^-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)*(-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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) + ((-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)*Sin[theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Cos[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + 2.5*^-7*Sin[phi]*Sin[theta]*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* (((-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)*Cos[phi]*Cos[theta] - 2*Sin[theta] + 4.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Cos[theta]*Sin[theta]^2 + 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[theta]*Sin[2*theta])*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(-Cos[theta] - 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)*Cos[phi]* (-2*Sin[theta] + Sin[3*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)*Cos[phi]*(-Sin[theta] + Sin[3*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Sin[phi]^2*Sin[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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 5.*^-7*Sin[phi]*((1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[theta]^2* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]*Sin[phi]^2*Sin[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)* Cos[2*theta] + (((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.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]* (Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[ 2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*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)*Sin[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[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)*Cos[2*theta] + (((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.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]* (Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[ 2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*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)*(-336/(E^(r^2/4)* r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[theta]^2* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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 + 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) - (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 + 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) + ((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)/2))*Sin[theta]^2* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Sin[2*theta]* (2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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) + ((-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)*Sin[phi]^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) + ((-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)*Cos[phi]* Sin[2*theta]*(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)*Cos[phi]* Sin[2*theta]) + (((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)*Cos[phi]* Sin[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))/4))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*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) + ((-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)*Cos[theta]* Sin[phi]^2*Sin[theta] - 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) + ((-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)*Cos[phi]^2* Sin[4*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)* (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) + ((-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 + 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) + ((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))*Cos[phi]* 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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (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)* Cos[phi]*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)*Cos[2*theta] + (((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.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (2.*^-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)* 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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (-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)* Cos[phi]*Cos[theta]*Sin[theta] + 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)*Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[2*theta] - 2.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)*Cos[phi]*Sin[2*theta])*(-3.75*^-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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^3 + 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* Cos[phi]*(-18*((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]*Sin[phi]^2*Sin[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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(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)* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - (((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 4.*^-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[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[ theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))/4 + 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)*((((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2)/4 - 12*((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)* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)*((-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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*((-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[phi]^2*Cos[2*theta]^2 + Cos[theta]^2* Sin[phi]^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)* Cos[phi]*((((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*Cos[theta]^3* Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*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*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])))))/(-2 + 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))^2) + 5.*^-7*Sin[phi]* ((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)*Cos[phi]*Sin[2*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* Cos[phi]*Sin[theta]^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)^2*Cos[phi]*Sin[theta]^ 4 - 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)* (2.*^-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[phi]*Sin[theta]^4 + Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]*Cos[2*theta]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*((-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[phi]*Cos[2*theta]*(-Cos[2*theta] + 2.*^-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[phi]*Cos[theta]*Sin[theta]^3 + 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)*Cos[phi]* (-Sin[2*theta] + Sin[4*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (2.*^-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)*Cos[theta]*Sin[phi]^2*Sin[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)* 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)*Sin[theta]^2)/2))/(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (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)* ((-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[phi]*Cos[theta]* Sin[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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (9.999999999999999*^-19*(-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]*Sin[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (-(Sin[phi]*Sin[theta]^2*(-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)^2*Cos[phi]*Sin[theta]^ 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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*Sin[theta]*(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)*Cos[theta]*(2 - 6*Cos[2*phi] + 3*Cos[2*(phi - theta)] + 6*Cos[2*theta] + 3*Cos[2*(phi + theta)]) + 16*Cos[phi]*Sin[theta]))/2 - 0.000054* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* (1 + 3*Cos[2*phi])*Sin[2*theta] + 9*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(8*Cos[phi]*(1 + 2*Cos[2*theta]) - 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)*(2 - 6*Cos[2*phi] + 3*Cos[2*(phi - theta)] + 6*Cos[2*theta] + 3*Cos[2*(phi + theta)])*Sin[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)^2*(4*(1 + 2*Cos[2*theta])* Sin[2*phi]*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)*Sin[phi]*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*Sin[phi]* (8*Cos[theta]^3*Sin[phi]^2*Sin[theta] + 4*Cos[2*phi]* Sin[4*theta] + Cos[phi]^2*(-7*Sin[2*theta] + 2*Sin[4*theta] - 3*Sin[6*theta])))))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))^2 - (1.*^-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)*Cos[phi]*Cos[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(1.*^-6*(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)^3*(1 + 3*Cos[2*phi])* Cos[theta]*Sin[theta]^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)^2*Cos[phi]*Sin[theta]^4)/ 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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*(-8*Cos[phi]*Sin[theta]^4 + 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)*(4*(1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^3 - 3*Cos[phi]^2*Sin[2*theta]^3)))/4 + 9*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (-2*Cos[phi]*(1 + 2*Cos[2*theta])*Sin[theta]^2 + 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)*(-4*(1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^3 + 3*Cos[phi]^2*Sin[2*theta]^3))) + 2.5*^-7* (-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*(8*Cos[phi]*(1 + 2*Cos[2*theta])*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)*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 2*Sin[phi]^2*Sin[4*theta] + Cos[phi]^2*(-7*Sin[2*theta] + 6*Sin[4*theta] - 3*Sin[6*theta])))))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*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)*Cos[phi]*Sin[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(1.*^-6* (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)^3* (1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^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)^2*Cos[phi]*Sin[theta]^4)/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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*(-8*Cos[phi]*Sin[theta]^4 + 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)*(4*(1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^3 - 3*Cos[phi]^2*Sin[2*theta]^3)))/4 + 9*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (-2*Cos[phi]*(1 + 2*Cos[2*theta])*Sin[theta]^2 + 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)*(-4*(1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^3 + 3*Cos[phi]^2*Sin[2*theta]^3))) + 2.5*^-7* (-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*(8*Cos[phi]*(1 + 2*Cos[2*theta])*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)*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 2*Sin[phi]^2*Sin[4*theta] + Cos[phi]^2*(-7*Sin[2*theta] + 6*Sin[4*theta] - 3*Sin[6*theta])))))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^2)) - 1.*^-6*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Sin[theta]^2* ((-5.*^-13*Sin[phi]*Sin[theta]*(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*Cos[phi]* (-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)* Cos[theta]*Sin[phi]^2*Sin[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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + Cos[phi]* (-4.*^-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[phi]*Cos[2*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)*Sin[2*theta] + 1.*^-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[phi]^2* (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)*Cos[theta]* Sin[theta]^3 + 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)* Sin[4*theta])) - 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)* (-12*((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)* Sin[phi]^2*Sin[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)*(4*Sin[phi]^2* Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*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)* (12*((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)* Sin[phi]^2*Sin[theta]^2*(-1 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)* ((-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[phi]* (4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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*Cos[theta]^2*Sin[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)*(2*Cos[phi]^2* Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2*Sin[theta]^2)/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)^2*Cos[theta]* (-1.*^-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]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* ((-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*(-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 + 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)*Cos[phi]*Sin[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)*Cos[theta]* (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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*theta])/2)))))/ (r*(1 - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))*(8 - 2.*^-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*Sin[phi]^2*Sin[theta]^2 - 4.3199999999999997*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 7.2*^-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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 4.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))) + (3.125*^-14*Csc[theta]*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*(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)* (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) + r*(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) + (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))*Cos[2*theta]* Sin[2*phi] + 2.16*^-10*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]^2*Sin[phi]* (Sin[2*theta] + Sin[4*theta]) - 0.000036* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(-(Cos[2*theta]* Sin[2*phi]) + 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)*Cos[phi]^2*Sin[phi]* (4*Sin[2*theta] + 5*Sin[4*theta]) + 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)*Sin[phi]*(Sin[phi]^2* Sin[2*theta] + Cos[phi]^2*Sin[4*theta])) - 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)^2*(-((Cos[theta]^2 + Cos[2*theta])*Sin[2*phi]) + 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)*Sin[phi]*(2*Sin[phi]^2* Sin[2*theta] + Cos[phi]^2*Sin[4*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)*(8*Cot[theta]*Sin[phi] + 1.*^-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*(2 - 2*Cos[2*phi] + 5*Cos[2*(phi - theta)] - 2*Cos[2*theta] + 5*Cos[2*(phi + theta)])*Cot[theta]* Sin[phi] + 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)* (-4*Cos[2*theta]*Sin[2*phi] + 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)* Sin[phi]*(2*Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]) - 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[phi]* (2*Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[ 4*theta]))))/4 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cot[theta]*Sin[phi] - 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 + 4*Cos[2*theta])*Sin[2*phi] + 1.*^-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] + Cos[3*theta])*Csc[theta]*(Sin[phi] - Sin[3*phi]) + 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[phi]*(2*Sin[2*theta] + 3*Sin[4*theta]) + 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)* (2*Cos[2*theta]*Sin[2*phi] - 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)* Sin[phi]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]) + 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[phi]* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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)*(8.*^-6*Sin[phi]^3*Sin[2*theta] + 6.*^-6*Cos[phi]^ 2*Sin[phi]*Sin[4*theta]))/4))))/(r*(-Csc[theta]^3 + 1.*^-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[phi]^2*Cos[2*theta]^ 2*Csc[theta]^3 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2 + 1.*^-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* Cot[theta]^2*Csc[theta]*Sin[phi]^2 + 4.999999999999999*^-19* (-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*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]* (Cos[phi]^2*Cos[2*theta]^2*Cot[theta]*Csc[theta] + Cos[theta]*(-2 + Cot[theta]^2)*Sin[phi]^2) + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^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*(4*Cos[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^2 - 2.*^-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[phi]*Cos[theta]*(Cos[phi]^2*Cos[theta]^2 + Sin[phi]^2)) + 6.*^-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.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)^2*Cos[phi]*Cos[theta]* (Cos[phi]^2*Cos[theta]^2 + Sin[phi]^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)^2*Cos[phi]*Cos[2*theta]* Cot[theta]*Csc[theta]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^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)*(Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2))/2))*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))) + (2.5*^-13*Sin[phi]*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*Cos[theta]^2*Sin[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)*(2*Cos[phi]^2* Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2*Sin[theta]^2)/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)^2*Cos[theta]* (-1.*^-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]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* ((-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*(-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 + 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)*Cos[phi]*Sin[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)*Cos[theta]* (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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*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)*((-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[phi]*Cos[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/(r*(1 - 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))) + (2.5*^-7*Sin[phi]*Sin[theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Sin[phi]^2* Sin[2*theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + 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)* (-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)*Cos[phi]*Cos[theta] - 2*Sin[theta] + 4.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Cos[theta]*Sin[theta]^2 + 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[theta]*Sin[2*theta])*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]*Cos[2*theta]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])) + 2*(1.*^-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[phi]^ 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)* Cos[phi]*Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(-Cos[theta] - 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)*Cos[phi]* (-2*Sin[theta] + Sin[3*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)*Cos[phi]*(-Sin[theta] + Sin[3*theta])))*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*Cot[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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*Cos[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))) + (5.*^-7*Sin[phi]*Sin[theta]*( (((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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*Cos[phi]*Sin[2*theta] - 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* Cos[phi]^2*Sin[2*theta]^2))/2 - 2.5*^-13* (-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*((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)*Cos[theta]* (4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*theta]) + 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)*((-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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*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)*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]) + 1.*^-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]* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta])))*( (1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (3.*^-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)* (-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/(r*(4 - 1.*^-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*Sin[phi]^2*Sin[theta]^2 - 2.1599999999999998*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 7.5*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 2.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))) - (1.25*^-13*Sin[phi]*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*((-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)* (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[theta]^2* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)* Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/(r*(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))) - (5.*^-7*Sin[phi]*Sin[theta]*((1 - 2.5*^-13*(336/(E^(r^2/4)* r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))*(-3.6000000000000005*^-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)* ((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]^2*Sin[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)* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2* Sin[theta]^2)/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*Cos[theta]^2*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)*(2*Cos[phi]^2* Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2* Sin[theta]^2)/2) + 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)* ((-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]* (-1.*^-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]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + 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)^2*Cos[theta]* (-1.*^-6*((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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] - 5.*^-7*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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + 7.5*^-7*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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* (((-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)/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)*Cos[phi]* Sin[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)*(-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)*Cos[phi]*Sin[ 2*theta])) + 6.*^-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)*Cos[theta]* (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)^2*Cos[theta]*(2*Cos[phi]^2* Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]* Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[ 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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2*Sin[ 2*theta] + (Cos[phi]^2*Sin[4*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)* Cos[theta]*(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)* ((-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*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*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)/4 + 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)*Cos[phi]* Sin[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)*(-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)*Cos[phi]*Sin[ 2*theta])) + 2.5*^-7*(-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)* ((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[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*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)*(Cos[phi]* Cos[2*theta] + 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)*(Sin[phi]^2*Sin[ 2*theta] + (Cos[phi]^2*Sin[4*theta])/2)))) + 1.25*^-13*(7.2*^-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* Cos[theta]^2*Sin[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)* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2* Sin[theta]^2)/2) + 4*r*Sin[theta]* ((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*(-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.*^-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)*Cos[phi]*Cos[theta]*Sin[theta])) + 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)^2*Cos[theta]* (8*Cos[phi]*Cos[2*theta] + 2.*^-6*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)*Cos[theta]* Sin[phi]^2*Sin[theta] - 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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta] + 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)*Cos[phi]^2* Sin[4*theta] + 1.*^-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)*(2*Sin[phi]^2* Sin[2*theta] + Cos[phi]^2*Sin[4*theta])) - 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)* Cos[theta]*(2*r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[2*theta])) + 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)^2*(Sin[phi]^2*Sin[ 2*theta] + Cos[phi]^2*Sin[4*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)*(2*Cos[phi]*Cos[2*theta] + 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)*(2*Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]))))*(-3.75*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^3 + 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* Cos[phi]*(-18*((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]*Sin[phi]^2*Sin[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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(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)* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - (((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 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)*((-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[phi]*(-4*Cos[theta]*Sin[phi]^2*Sin[theta]^ 3 + 2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))/4 + 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)*((((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2)/4 - 12*((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)* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)*((-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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*((-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[phi]^2*Cos[2*theta]^2 + Cos[theta]^2* Sin[phi]^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)* Cos[phi]*((((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*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 2*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] - Sin[phi]^2*Sin[4*theta]))/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*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]))))))/(r*(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))^2) + (2.5*^-7*(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)* (-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))*Sin[phi]*Sin[2*theta]*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]))) + (-6.*^-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)* Cos[phi]*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)*Cos[phi]*Sin[2*theta]))* (-4*Cos[2*theta]*Sin[phi] + 8.*^-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[phi]*Cos[theta]* Sin[phi]*Sin[theta]^3 + 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)*Sin[2*phi]*(-Sin[2*theta] + Sin[4*theta]))*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]))) - 5.*^-13*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)* Cos[phi]*Sin[2*theta]))*(0.000054*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[theta]*(Sin[phi] - 3*Sin[3*phi])*Sin[theta]^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)^2*Cos[phi]*Sin[phi]* Sin[theta]^4 - 72*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* Sin[phi]*Sin[theta]^2*(-(Cos[phi]*(1 + 2*Cos[2*theta])) + 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)*(Cos[phi]^2*(Cos[theta] + 3*Cos[3*theta]) + 4*Cos[theta]*Sin[phi]^2)*Sin[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)* (-1.25*^-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)^2*Cos[theta]*(2 - 6*Cos[2*phi] + 3*Cos[ 2*(phi - theta)] + 6*Cos[2*theta] + 3*Cos[ 2*(phi + theta)])*Sin[phi]*Sin[theta]^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)*Sin[2*phi]*Sin[theta]^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)^2*Sin[phi]*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*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)^ 2*(-4*(1 + 2*Cos[2*theta])*Sin[2*phi]*Sin[theta]^2 + 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)*Sin[phi]*(-8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Sin[phi]^2*Sin[4*theta] + Cos[phi]^2* (7*Sin[2*theta] - 6*Sin[4*theta] + 3*Sin[ 6*theta]))))))/(r*(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))^2))))/ (Sqrt[2]*r) - (-1.*^-6*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Sin[theta]^2* ((2.5*^-7*(4*Cos[phi]*Cos[2*theta] + 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)* (2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*((1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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]*Sin[phi]^2* Sin[2*theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (Csc[theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))*(Cos[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)*Cos[phi]*Sin[3*theta] + 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)*Cos[phi]*Sin[3*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*Sin[phi]^2* (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)*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 - 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*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) + (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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + (2.5*^-13*Sin[phi]^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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta]))* (-Cos[theta] - 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)*Cos[phi]* (-2*Sin[theta] + Sin[3*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)*Cos[phi]*(-Sin[theta] + Sin[3*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*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)*Cos[phi]*Cos[theta] + Sin[theta]*(1 - 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)* Cos[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]*Cos[theta]* Sin[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)*Cos[phi]*Sin[2*theta] + 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)*Cos[phi]*Sin[2*theta])))/(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r + (2.5*^-7*((-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) + ((-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)*Sin[phi]^2* Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta] - 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (3.*^-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)*(-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r - (2.5*^-13*Sin[phi]^2*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*Cos[theta]^2*Sin[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)*(2*Cos[phi]^2* Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2*Sin[theta]^2)/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)^2*Cos[theta]* (-1.*^-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]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* ((-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*(-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 + 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)*Cos[phi]*Sin[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)*Cos[theta]* (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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*theta])/2))))* ((-2.5*^-7*((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)*Cos[phi]*Csc[theta]*Sin[2*theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*((-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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(1 - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - (2.5*^-13*Sin[phi]^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)* (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[theta]^2* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Sin[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r - (2.5*^-7*((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)* ((-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta] - 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (3.*^-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)*(-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r + (5.*^-7*((-1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta]))* (-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[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)*Cos[2*theta] + (((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.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]* (Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[ 2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^2 + ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]*Sin[phi]^2*Sin[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)* Cos[2*theta] + (((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.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]* (Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[ 2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^2 + (1.*^-6* ((-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 + 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) - (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 + 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) + ((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)/2))*Sin[phi]^2* Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)*((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]*(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)*Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (Cos[phi]*(2 - 2.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta])*(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)* ((-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[phi]*Cos[2*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)*Sin[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)*Cos[phi]*Sin[2*theta]))/ 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)* Sin[2*theta]*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + ((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) + ((-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 + 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) + ((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))*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Sin[phi]^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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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)* ((-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (6.*^-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)* (-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[phi]*Sin[phi]^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)*Cos[2*theta] + (((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)*Sin[2*theta])/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (5.999999999999999*^-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)*(-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta]*(3.75*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^3 - 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* Cos[phi]*(-18*((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]*Sin[phi]^2*Sin[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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + 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/4*(((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2) + 12*((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)* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2) - 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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*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)*(-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)* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (1 + 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)* Cos[phi]*Sin[2*theta]) + (((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*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)* Cos[phi]*Sin[2*theta]))/4 + 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)* ((-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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*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)* (4*((-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[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*(2*Cos[phi]^3*Cos[2*theta]^ 2*Sin[2*theta] + Cos[phi]*Sin[phi]^2*Sin[ 4*theta]) + (((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*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))/4))))/(-2 + 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))^2))/r + (5.*^-7*(Cos[phi]*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)* Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 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)* Cos[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))) + 1.*^-6*Sin[phi]* ((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)* ((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*Cos[2*theta]*Sin[phi]*Sin[2*theta])/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 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)*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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]*Sin[phi]*(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)* Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*Cot[theta]*Sin[phi]*Sin[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)* Cos[phi]*Sin[2*theta]))/(4*(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 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)*((-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)*Cot[theta]*Sin[phi]*Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))) + (6.*^-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)* Cos[phi]*Sin[phi]*(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)*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)*Sin[theta]^2)/2)*Sin[2*theta])/(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*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)*(-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[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))) - (3.*^-12*((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)* Cos[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta]* (-(Sin[phi]*Sin[theta]^2*(-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)^2*Cos[phi]*Sin[theta]^ 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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*Sin[theta]*(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)*Cos[theta]*(2 - 6*Cos[2*phi] + 3*Cos[2*(phi - theta)] + 6*Cos[2*theta] + 3*Cos[2*(phi + theta)]) + 16*Cos[phi]*Sin[theta]))/2 - 0.000054* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* (1 + 3*Cos[2*phi])*Sin[2*theta] + 9*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(8*Cos[phi]*(1 + 2*Cos[2*theta]) - 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)*(2 - 6*Cos[2*phi] + 3*Cos[2*(phi - theta)] + 6*Cos[2*theta] + 3*Cos[2*(phi + theta)])*Sin[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)^2*(4*(1 + 2*Cos[2*theta])* Sin[2*phi]*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)*Sin[phi]*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*Sin[phi]*(8*Cos[theta]^3*Sin[phi]^2*Sin[theta] + 4*Cos[2*phi]*Sin[4*theta] + Cos[phi]^2* (-7*Sin[2*theta] + 2*Sin[4*theta] - 3*Sin[ 6*theta])))))/(-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^ 2 + 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^ 3)) + 1.*^-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*(2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^ 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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[ 4*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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*Cos[2*theta]*Sin[phi]*(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)* Cos[phi]*Sin[2*theta])*(1.*^-6*(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)^3* (1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^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)^2*Cos[phi]*Sin[theta]^4)/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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(-8*Cos[phi]*Sin[theta]^ 4 + 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)*(4*(1 + 3*Cos[2*phi])* Cos[theta]*Sin[theta]^3 - 3*Cos[phi]^2*Sin[2*theta]^ 3)))/4 + 9*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (-2*Cos[phi]*(1 + 2*Cos[2*theta])*Sin[theta]^2 + 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)*(-4*(1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^3 + 3*Cos[phi]^2*Sin[2*theta]^3))) + 2.5*^-7* (-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*(8*Cos[phi]*(1 + 2*Cos[2*theta])*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)*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 2*Sin[phi]^2*Sin[4*theta] + Cos[phi]^2* (-7*Sin[2*theta] + 6*Sin[4*theta] - 3*Sin[ 6*theta])))))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*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)*Cot[theta]*Sin[phi]* (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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])*(1.*^-6*(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)^3*(1 + 3*Cos[2*phi])* Cos[theta]*Sin[theta]^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)^2*Cos[phi]*Sin[theta]^4)/ 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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*(-8*Cos[phi]*Sin[theta]^4 + 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)*(4*(1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^3 - 3*Cos[phi]^2*Sin[2*theta]^3)))/4 + 9*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (-2*Cos[phi]*(1 + 2*Cos[2*theta])*Sin[theta]^2 + 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)*(-4*(1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^3 + 3*Cos[phi]^2*Sin[2*theta]^3))) + 2.5*^-7* (-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*(8*Cos[phi]*(1 + 2*Cos[2*theta])*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)*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 2*Sin[phi]^2*Sin[4*theta] + Cos[phi]^2* (-7*Sin[2*theta] + 6*Sin[4*theta] - 3*Sin[ 6*theta])))))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^ 2)))/r) + 1.*^-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[phi]*Cos[2*theta]* ((1.25*^-13*Sin[phi]*(4*Cos[phi]*Cos[2*theta] + 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)* (2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*((2.5*^-7*(-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*Sin[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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)* 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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*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) - (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)*Sin[theta]^2)* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (Cos[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)*Cos[phi]*Sin[3*theta] + 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)*Cos[phi]*Sin[3*theta]))/(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) - (2.5*^-13*Sin[phi]*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*Cos[theta]^2*Sin[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)*(2*Cos[phi]^2* Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2*Sin[theta]^2)/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)^2*Cos[theta]* (-1.*^-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]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* ((-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*(-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 + 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)*Cos[phi]*Sin[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)*Cos[theta]* (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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*theta])/2))))* ((-2.5*^-7*(-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)* ((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)*Cos[phi]*Sin[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (1 - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*( -(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) + 2.5*^-7*Sin[phi]*Sin[theta]*((1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta] - 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (3.*^-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)*(-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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) + ((-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)*Sin[theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Cos[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + 2.5*^-7*Sin[phi]*Sin[theta]*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* (((-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)*Cos[phi]*Cos[theta] - 2*Sin[theta] + 4.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Cos[theta]* Sin[theta]^2 + 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[theta]*Sin[2*theta])*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(-Cos[theta] - 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)*Cos[phi]* (-2*Sin[theta] + Sin[3*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)*Cos[phi]*(-Sin[theta] + Sin[3*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Sin[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 5.*^-7*Sin[phi]*((1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[theta]^2*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]*Sin[phi]^2*Sin[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)* Cos[2*theta] + (((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.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Sin[2*theta] - 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)*Cos[phi]* Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* 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)*Sin[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[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)*Cos[2*theta] + (((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.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Sin[2*theta] - 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)*Cos[phi]* Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* 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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[theta]^2*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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 + 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) - (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 + 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) + ((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)/2))*Sin[theta]^2* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Sin[2*theta]* (2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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) + ((-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)*Sin[phi]^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) + ((-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)*Cos[phi]*Sin[2*theta]*(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)*Cos[phi]*Sin[2*theta]) + (((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)*Cos[phi]* Sin[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))/4))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*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) + ((-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)*Cos[theta]*Sin[phi]^2*Sin[theta] - 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) + ((-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)*Cos[phi]^2*Sin[4*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)* (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) + ((-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 + 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) + ((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))*Cos[phi]* 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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (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)* Cos[phi]*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)*Cos[2*theta] + (((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.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]*Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]*Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (2.*^-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)* 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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*(-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)*Cos[phi]* Cos[theta]*Sin[theta] + 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)* Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[2*theta] - 2.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)*Cos[phi]* Sin[2*theta])*(-3.75*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^3 + 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* Cos[phi]*(-18*((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]*Sin[phi]^2*Sin[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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(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)* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - (((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 4.*^-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[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])))/4 + 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)*((((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2)/4 - 12*((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)* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)*((-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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*((-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[phi]^2*Cos[2*theta]^2 + Cos[theta]^2* Sin[phi]^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)* Cos[phi]*((((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*Cos[theta]^3*Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] - Sin[phi]^2* Sin[4*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*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))^2) + 5.*^-7*Sin[phi]*((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)*Cos[phi]*Sin[2*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* Cos[phi]*Sin[theta]^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)^2*Cos[phi]*Sin[theta]^ 4 - 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)* (2.*^-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[phi]*Sin[theta]^4 + Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*((-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[phi]*Cos[2*theta]*(-Cos[2*theta] + 2.*^-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[phi]*Cos[theta]*Sin[theta]^3 + 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)*Cos[phi]* (-Sin[2*theta] + Sin[4*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (2.*^-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)*Cos[theta]*Sin[phi]^2*Sin[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)* 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)*Sin[theta]^2)/2))/(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (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)* ((-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[phi]*Cos[theta]* Sin[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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (9.999999999999999*^-19*(-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]*Sin[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (-(Sin[phi]*Sin[theta]^2*(-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)^2*Cos[phi]* Sin[theta]^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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]* (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)*Cos[theta]*(2 - 6*Cos[2*phi] + 3*Cos[2*(phi - theta)] + 6*Cos[2*theta] + 3*Cos[2*(phi + theta)]) + 16*Cos[phi]*Sin[theta]))/2 - 0.000054* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* (1 + 3*Cos[2*phi])*Sin[2*theta] + 9*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(8*Cos[phi]*(1 + 2*Cos[2*theta]) - 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)*(2 - 6*Cos[2*phi] + 3*Cos[2*(phi - theta)] + 6*Cos[2*theta] + 3*Cos[2*(phi + theta)])*Sin[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)^2*(4*(1 + 2*Cos[2*theta])* Sin[2*phi]*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)*Sin[phi]*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*Sin[phi]*(8*Cos[theta]^3* Sin[phi]^2*Sin[theta] + 4*Cos[2*phi]*Sin[4*theta] + Cos[phi]^2*(-7*Sin[2*theta] + 2*Sin[4*theta] - 3*Sin[6*theta])))))/(-2 + 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))^2 - (1.*^-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)*Cos[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(1.*^-6*(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)^3*(1 + 3*Cos[2*phi])* Cos[theta]*Sin[theta]^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)^2*Cos[phi]* Sin[theta]^4)/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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)*(-8*Cos[phi]* Sin[theta]^4 + 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)*(4*(1 + 3*Cos[2*phi])* Cos[theta]*Sin[theta]^3 - 3*Cos[phi]^2*Sin[2*theta]^ 3)))/4 + 9*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (-2*Cos[phi]*(1 + 2*Cos[2*theta])*Sin[theta]^2 + 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)*(-4*(1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^3 + 3*Cos[phi]^2*Sin[2*theta]^3))) + 2.5*^-7* (-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*(8*Cos[phi]* (1 + 2*Cos[2*theta])*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)* (Cos[phi]^2*(6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 2*Sin[phi]^2* Sin[4*theta] + Cos[phi]^2*(-7*Sin[2*theta] + 6*Sin[4*theta] - 3*Sin[6*theta])))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* 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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))* (1.*^-6*(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)^3* (1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^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)^2*Cos[phi]*Sin[theta]^4)/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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*(-8*Cos[phi]*Sin[theta]^4 + 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)*(4*(1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^3 - 3*Cos[phi]^2*Sin[2*theta]^3)))/4 + 9*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (-2*Cos[phi]*(1 + 2*Cos[2*theta])*Sin[theta]^2 + 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)*(-4*(1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^3 + 3*Cos[phi]^2*Sin[2*theta]^3))) + 2.5*^-7* (-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*(8*Cos[phi]* (1 + 2*Cos[2*theta])*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)* (Cos[phi]^2*(6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 2*Sin[phi]^2* Sin[4*theta] + Cos[phi]^2*(-7*Sin[2*theta] + 6*Sin[4*theta] - 3*Sin[6*theta])))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2)) + r^2*(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)*Cos[phi]*Sin[2*theta])* ((-5.*^-13*Sin[phi]*Sin[theta]*(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*Cos[phi]* (-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)* Cos[theta]*Sin[phi]^2*Sin[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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + Cos[phi]* (-4.*^-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[phi]*Cos[2*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)*Sin[2*theta] + 1.*^-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[phi]^2* (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)*Cos[theta]*Sin[theta]^3 + 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)* Sin[4*theta])) - 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)* (-12*((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)* Sin[phi]^2*Sin[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)*(4*Sin[phi]^2* Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*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)*(12*((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)*Sin[phi]^2*Sin[theta]^2* (-1 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)* ((-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[phi]* (4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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*Cos[theta]^2*Sin[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)*(2*Cos[phi]^2* Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2*Sin[theta]^2)/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)^2*Cos[theta]* (-1.*^-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]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* ((-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*(-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 + 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)*Cos[phi]*Sin[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)*Cos[theta]* (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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*theta])/2)))))/ (r*(1 - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))* (8 - 2.*^-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*Sin[phi]^2*Sin[theta]^2 - 4.3199999999999997*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 7.2*^-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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 4.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + (3.125*^-14*Csc[theta]*(4*Cos[phi]* Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*(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)*(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) + r*(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) + (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))*Cos[2*theta]*Sin[2*phi] + 2.16*^-10* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]^2*Sin[phi]* (Sin[2*theta] + Sin[4*theta]) - 0.000036* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(-(Cos[2*theta]* Sin[2*phi]) + 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)*Cos[phi]^2*Sin[phi]* (4*Sin[2*theta] + 5*Sin[4*theta]) + 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)*Sin[phi]*(Sin[phi]^2* Sin[2*theta] + Cos[phi]^2*Sin[4*theta])) - 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)^2*(-((Cos[theta]^2 + Cos[2*theta])*Sin[2*phi]) + 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)*Sin[phi]*(2*Sin[phi]^2* Sin[2*theta] + Cos[phi]^2*Sin[4*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)*(8*Cot[theta]*Sin[phi] + 1.*^-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*(2 - 2*Cos[2*phi] + 5*Cos[2*(phi - theta)] - 2*Cos[2*theta] + 5*Cos[2*(phi + theta)])*Cot[theta]* Sin[phi] + 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)* (-4*Cos[2*theta]*Sin[2*phi] + 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)* Sin[phi]*(2*Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]) - 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[phi]* (2*Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta]))))/ 4 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*Cot[theta]*Sin[phi] - 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 + 4*Cos[2*theta])* Sin[2*phi] + 1.*^-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] + Cos[3*theta])*Csc[theta]*(Sin[phi] - Sin[3*phi]) + 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[phi]* (2*Sin[2*theta] + 3*Sin[4*theta]) + 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)*(2*Cos[2*theta]* Sin[2*phi] - 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)* Sin[phi]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]) + 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[phi]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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)*(8.*^-6*Sin[phi]^3* Sin[2*theta] + 6.*^-6*Cos[phi]^2*Sin[phi]*Sin[ 4*theta]))/4))))/(r*(-Csc[theta]^3 + 1.*^-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[phi]^2* Cos[2*theta]^2*Csc[theta]^3 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2 + 1.*^-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*Cot[theta]^2* Csc[theta]*Sin[phi]^2 + 4.999999999999999*^-19* (-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* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*(Cos[phi]^2*Cos[2*theta]^2*Cot[theta]*Csc[theta] + Cos[theta]*(-2 + Cot[theta]^2)*Sin[phi]^2) + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^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*(4*Cos[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^2 - 2.*^-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[phi]*Cos[theta]*(Cos[phi]^2*Cos[theta]^2 + Sin[phi]^2)) + 6.*^-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.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)^2*Cos[phi]*Cos[theta]* (Cos[phi]^2*Cos[theta]^2 + Sin[phi]^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)^2*Cos[phi]*Cos[2*theta]* Cot[theta]*Csc[theta]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^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)*(Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2))/2))*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + (2.5*^-13*Sin[phi]*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* Cos[theta]^2*Sin[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)* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2* Sin[theta]^2)/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)^2*Cos[theta]* (-1.*^-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]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* ((-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*(-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 + 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)*Cos[phi]*Sin[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)*Cos[theta]* (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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*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)* ((-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(1 - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + (2.5*^-7*Sin[phi]*Sin[theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Sin[phi]^2*Sin[2*theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + 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)* (-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)*Cos[phi]*Cos[theta] - 2*Sin[theta] + 4.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Cos[theta]* Sin[theta]^2 + 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[theta]*Sin[2*theta])*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])) + 2* (1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(-Cos[theta] - 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)*Cos[phi]*(-2*Sin[theta] + Sin[3*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)*Cos[phi]* (-Sin[theta] + Sin[3*theta])))*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta])))) + (5.*^-7*Sin[phi]*Sin[theta]* ((((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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*Cos[phi]*Sin[2*theta] - 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* Cos[phi]^2*Sin[2*theta]^2))/2 - 2.5*^-13* (-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* ((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)*Cos[theta]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta]) + 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)*((-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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*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)*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]) + 1.*^-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]* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta])))* ((1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta] - 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (3.*^-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)*(-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(4 - 1.*^-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*Sin[phi]^2*Sin[theta]^2 - 2.1599999999999998*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 7.5*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 2.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - (1.25*^-13*Sin[phi]*(4*Cos[phi]* Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*((-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[theta]^2* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Sin[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - (5.*^-7*Sin[phi]*Sin[theta]* ((1 - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))* (-3.6000000000000005*^-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)*((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]^2*Sin[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)*(2*Cos[phi]^2* Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2* Sin[theta]^2)/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*Cos[theta]^2*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)*(2*Cos[phi]^2* Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2* Sin[theta]^2)/2) + 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)* ((-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]* (-1.*^-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]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + 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)^2*Cos[theta]* (-1.*^-6*((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)*Cos[theta]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] - 5.*^-7*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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + 7.5*^-7*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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* (((-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)/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)*Cos[phi]* Sin[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)*(-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)*Cos[phi]* Sin[2*theta])) + 6.*^-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)*Cos[theta]* (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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*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)*Cos[theta]* (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)*((-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*Cos[phi]^2*Cos[2*theta] + Sin[phi]^ 2)*Sin[theta] + r*Cos[phi]*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)/4 + 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)*Cos[phi]* Sin[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)*(-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)*Cos[phi]*Sin[ 2*theta])) + 2.5*^-7*(-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)* ((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[phi]^2*Sin[2*theta] + (Cos[phi]^2* Sin[4*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)*(Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*theta])/2)))) + 1.25*^-13*(7.2*^-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* Cos[theta]^2*Sin[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)* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2* Sin[theta]^2)/2) + 4*r*Sin[theta]* ((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*(-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.*^-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)*Cos[phi]*Cos[theta]*Sin[theta])) + 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)^2*Cos[theta]* (8*Cos[phi]*Cos[2*theta] + 2.*^-6*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)*Cos[theta]*Sin[phi]^2*Sin[theta] - 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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta] + 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)*Cos[phi]^2* Sin[4*theta] + 1.*^-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)*(2*Sin[phi]^2* Sin[2*theta] + Cos[phi]^2*Sin[4*theta])) - 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)*Cos[theta]* (2*r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[2*theta])) + 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)^2*(Sin[phi]^2* Sin[2*theta] + Cos[phi]^2*Sin[4*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)*(2*Cos[phi]*Cos[2*theta] + 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)*(2*Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]))))*(-3.75*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^3 + 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* Cos[phi]*(-18*((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]*Sin[phi]^2*Sin[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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(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)* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - (((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 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)*((-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[phi]*(-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])))/4 + 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)*((((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2)/4 - 12*((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)* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)*((-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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*((-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[phi]^2*Cos[2*theta]^2 + Cos[theta]^2* Sin[phi]^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)* Cos[phi]*((((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*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] - Sin[phi]^2* Sin[4*theta]))/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*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))))))/ (r*(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))^2) + (2.5*^-7*(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)* (-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))*Sin[phi]*Sin[2*theta]*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) + (-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*(-4*Cos[2*theta]*Sin[phi] + 8.*^-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[phi]*Cos[theta]*Sin[phi]*Sin[theta]^3 + 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)*Sin[2*phi]* (-Sin[2*theta] + Sin[4*theta]))*(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) - 5.*^-13* (4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*(0.000054*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[theta]*(Sin[phi] - 3*Sin[3*phi])*Sin[theta]^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)^2*Cos[phi]*Sin[phi]* Sin[theta]^4 - 72*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* Sin[phi]*Sin[theta]^2*(-(Cos[phi]*(1 + 2*Cos[2*theta])) + 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)*(Cos[phi]^2*(Cos[theta] + 3*Cos[3*theta]) + 4*Cos[theta]*Sin[phi]^2)*Sin[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)* (-1.25*^-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)^2*Cos[theta]*(2 - 6*Cos[2*phi] + 3*Cos[2*(phi - theta)] + 6*Cos[2*theta] + 3*Cos[2*(phi + theta)])*Sin[phi]*Sin[theta]^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)*Sin[2*phi]*Sin[theta]^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)^2*Sin[phi]*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*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)^2* (-4*(1 + 2*Cos[2*theta])*Sin[2*phi]*Sin[theta]^2 + 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)*Sin[phi]*(-8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Sin[phi]^2*Sin[4*theta] + Cos[phi]^2*(7*Sin[2*theta] - 6*Sin[4*theta] + 3*Sin[6*theta]))))))/ (r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))^2)))/ (Sqrt[2]*r))/2))/(Sqrt[2]*r) + (((r^2*(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)*Cos[phi]*Sin[2*theta])* ((-1.*^-12*(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* Cos[phi]*(-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)* Cos[theta]*Sin[phi]^2*Sin[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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + Cos[phi]* (-4.*^-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[phi]*Cos[2*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)*Sin[2*theta] + 1.*^-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[phi]^2* (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)*Cos[theta]*Sin[theta]^3 + 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)* Sin[4*theta])) - 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)* (-12*((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)* Sin[phi]^2*Sin[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)*(4*Sin[phi]^2* Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*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)*(12*((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)*Sin[phi]^2*Sin[theta]^2* (-1 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)* ((-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[phi]* (4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])))^2)/(8 - 2.*^-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*Sin[phi]^2*Sin[theta]^ 2 - 4.3199999999999997*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 7.2*^-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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 4.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))^ 2 - (1.*^-6*(-2.*^-12*(-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)*((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[phi]^2* Sin[theta]^2 - 7.5*^-7*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*((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)*Cos[phi]*Cos[theta]* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^3 - 0.000648* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*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*(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[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - (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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]))/4 - (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)* ((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]))/4 - ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*((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)*Cos[phi]^2*Sin[2*theta]^2)/2 + 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*((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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3) + 72*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*(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)* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^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)^2*Cos[phi]* ((((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*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] - Sin[phi]^2* Sin[4*theta]))/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*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*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)* ((-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[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))*( 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*Cos[phi]* (-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)* Cos[theta]*Sin[phi]^2*Sin[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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + Cos[phi]* (-4.*^-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[phi]*Cos[2*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)*Sin[2*theta] + 1.*^-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[phi]^2* (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)*Cos[theta]* Sin[theta]^3 + 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)* Sin[4*theta])) - 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)* (-12*((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)* Sin[phi]^2*Sin[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)*(4*Sin[phi]^2* Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*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)* (12*((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)* Sin[phi]^2*Sin[theta]^2*(-1 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)* ((-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[phi]* (4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]))) + (8 - 2.*^-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*Sin[phi]^2* Sin[theta]^2 - 4.3199999999999997*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 7.2*^-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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 4.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))*( 7.200000000000001*^-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)*((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[phi]*(-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)* Cos[theta]*Sin[phi]^2*Sin[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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + 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*Cos[phi]* (-6*((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)*Cos[theta]*Sin[phi]^2* Sin[theta]^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)*(4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + Cos[phi]*(-4.*^-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[phi]*Cos[2*theta]^2 - 4.*^-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[phi]* Cos[2*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)*Sin[2*theta] + 2.*^-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[phi]^2*(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)*Cos[theta]* Sin[theta]^3 + 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)* Sin[4*theta]) + 1.*^-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[phi]^2*(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)*Cos[theta]* Sin[theta]^3 + 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)*Sin[4*theta])) - 5.*^-7*((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)* (-12*((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)* Sin[phi]^2*Sin[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)*(4*Sin[phi]^2* Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])) - 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)*(-12*((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)*Sin[phi]^2*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)*(4*Sin[phi]^2* Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2))/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)^2*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)* ((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*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)* (12*((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)* Sin[phi]^2*Sin[theta]^2*(-1 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)* ((-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[phi]* (4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)*(0.000012*((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)*Cos[phi]* Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 12*((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)*Sin[phi]^2*Sin[theta]^ 2*(-1 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 2.5*^-7* ((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*Cos[phi]*(8*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^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)*(-2*Sin[phi]^2* Sin[theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 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)^2*Cos[phi]*(4*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*((-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[phi]* (4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])))))/(-8 + 2.*^-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*Sin[phi]^2*Sin[theta]^ 2 + 4.3199999999999997*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 + 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 7.2*^-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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 4.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))^ 2 - (1.25*^-13*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]*Sin[2*theta]))* ((-2.5*^-7*(-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)* ((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)*Cos[phi]*Sin[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[ 2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)* Cos[phi]*(-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]))) - (5.*^-13*Sin[phi]^2*Sin[theta]* ((((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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*Cos[phi]*Sin[2*theta] - 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* Cos[phi]^2*Sin[2*theta]^2))/2 - 2.5*^-13* (-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*((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)*Cos[theta]*( 4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*theta]) + 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)*((-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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*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)*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]) + 1.*^-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]* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta])))* ((-2.5*^-7*((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)*Cos[phi]*Csc[theta]*Sin[2*theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*((-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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (4 - 1.*^-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*Sin[phi]^2*Sin[theta]^2 - 2.1599999999999998*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 7.5*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[ 2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 2.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)* Cos[phi]*(-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])))) + 1.*^-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[phi]*Cos[2*theta]* ((-5.*^-13*r*(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*Cos[ phi]*(-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)*Cos[theta]*Sin[phi]^2* Sin[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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + Cos[phi]*(-4.*^-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[phi]*Cos[2*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)*Sin[2*theta] + 1.*^-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[phi]^2*(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)*Cos[theta]*Sin[theta]^3 + 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)* Sin[4*theta])) - 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)*(-12* ((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)*Sin[phi]^2*Sin[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)*(4*Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2* Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*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)*(12*((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)* Sin[phi]^2*Sin[theta]^2*(-1 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)*((-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[phi]*(4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))*((-2.5*^-7* (-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)*((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)*Cos[phi]* Sin[2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (8 - 2.*^-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*Sin[phi]^2*Sin[theta]^2 - 4.3199999999999997*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[ 2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 7.2*^-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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 4.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)* Cos[phi]*(-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]))) - 2.5*^-13*r* ((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)*( (-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[phi]*Cos[2*theta]*( -1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Cos[phi]*Sin[2*theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-2.5*^-7*(-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)*( (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)*Cos[phi]*Sin[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Cos[phi]*Cos[2*theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - (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) + ((-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)*Sin[phi]^2*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 2.5*^-13*r*Sin[phi]^2*Sin[theta]* ((-2.5*^-7*((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)*Cos[phi]*Csc[theta]*Sin[2*theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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) + ((-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)*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) + (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)*((-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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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) + ((-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)*Sin[theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Cos[theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - (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) + ((-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)*Cos[phi]*Sin[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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 5.*^-7*r*((2.5*^-13*(-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)*( (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)*Cos[phi]*Sin[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]*Sin[phi]^2*Sin[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)* Cos[2*theta] + (((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.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]*(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)*Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]* Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* 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)*Cos[phi]*Cos[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[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)*Cos[2*theta] + (((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.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]*(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)*Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]* Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2 - (2.5*^-7*((-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)*((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)*Cos[phi]*Sin[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - (2.5*^-7*(-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)*((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)*Cos[phi]*Sin[ 2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) + (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)*Cos[phi]*Cos[2*theta]*(2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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) + ((-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)*Sin[phi]^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) + ((-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)*Cos[phi]*Sin[2*theta]*(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)*Cos[phi]*Sin[2*theta]) + (((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)*Cos[phi]*Sin[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))/4))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) + (((-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[phi]*Cos[ 2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - (2.5*^-7*(-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)*((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)*Cos[phi]*Sin[ 2*theta]*(-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) + ((-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)*Cos[theta]*Sin[phi]^2*Sin[theta] - 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) + ((-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)*Cos[phi]^2*Sin[4*theta]))/ (1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - (1.*^-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)*(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) + ((-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)*Cos[phi]*Sin[phi]^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)*Cos[2*theta] + (((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))/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (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*((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)*Sin[phi]^2*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (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) + ((-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)/2)*Sin[phi]^ 2*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (1.9999999999999998*^-18*(-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) + ((-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)*Sin[phi]^2*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*( -3.75*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^3 + 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*Cos[phi]* (-18*((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]*Sin[phi]^2*Sin[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)*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(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)* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - (((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 4.*^-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[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])))/4 + 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)*((((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2)/4 - 12*((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)* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)*((-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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*((-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[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* ((((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*Cos[theta]^3* Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*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*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])))))/(-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))^2)) - 1.*^-6*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r* (3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Sin[theta]^2* ((-5.*^-13*Sin[phi]*(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*Cos[phi]*( -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)*Cos[theta]*Sin[phi]^2* Sin[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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + Cos[phi]*(-4.*^-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[phi]*Cos[2*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)*Sin[2*theta] + 1.*^-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[phi]^2*(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)*Cos[theta]*Sin[theta]^3 + 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)* Sin[4*theta])) - 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)*(-12* ((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)*Sin[phi]^2*Sin[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)*(4*Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2* Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*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)*(12*((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)* Sin[phi]^2*Sin[theta]^2*(-1 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)*((-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[phi]*(4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))*((-2.5*^-7* ((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)*Cos[phi]*Csc[theta]*Sin[2*theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*((-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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (8 - 2.*^-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*Sin[phi]^2*Sin[theta]^2 - 4.3199999999999997*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[ 2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 7.2*^-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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 4.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)* Cos[phi]*(-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]))) - 2.5*^-13*Sin[phi]* ((-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) + ((-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)*Sin[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-2.5*^-7*((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)*Cos[phi]*Csc[theta]*Sin[2*theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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) + ((-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)*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) + (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)*((-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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 2.5*^-13*Sin[phi]*((-2.5*^-7*(-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)*((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)*Cos[phi]*Sin[ 2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Cos[phi]*Cos[2*theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - (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) + ((-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)*Sin[phi]^2*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]*Sin[2*theta]))/ (1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Cot[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)*Cos[phi]* Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))/ (1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Cos[phi]*(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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 5.*^-7*Sin[phi]*((2.5*^-13*((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)*Cos[phi]*Csc[theta]* Sin[2*theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta]))*( -1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[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)*Cos[2*theta] + (((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.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]*(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)*Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]* Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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) + ((-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)*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[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)*Cos[2*theta] + (((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.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]*(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)*Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]* Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2 - (2.5*^-7*((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)*Cos[phi]*Csc[ theta]*Sin[2*theta]*(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)^2* Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - (2.5*^-7*((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)*Cos[phi]*Csc[theta]* Sin[2*theta]*(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)*((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]*(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)*Cos[phi]*Sin[2*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)*Sin[theta]* (1 + 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)* Cos[phi]*Cos[theta]*Sin[theta] - 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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - (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) + ((-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)*Cos[phi]*(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)*((-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[phi]*Cos[2*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)*Sin[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)*Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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) + ((-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)/2)*( 1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) + (1.*^-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)*Cos[phi]^2*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)* Cos[2*theta] + (((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))/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (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)^2*Cos[phi]*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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (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)*( (-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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (1.9999999999999998*^-18*(-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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*( -3.75*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^3 + 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*Cos[phi]* (-18*((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]*Sin[phi]^2*Sin[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)*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(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)* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - (((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 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)*((-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)*(-4*Cos[phi]*Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]* Sin[2*phi]*Sin[4*theta])))/4 + 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)*((((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2)/4 - 12*((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)* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)*((-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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*((-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[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* ((((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*Cos[theta]^3* Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*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*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])))))/(-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))^2)))/ (Sqrt[2]*r) - (I*Csc[theta]*(-1.*^-6*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Sin[theta]^2* ((-1.*^-12*(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* Cos[phi]*(-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)* Cos[theta]*Sin[phi]^2*Sin[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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + Cos[phi]* (-4.*^-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[phi]*Cos[2*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)*Sin[2*theta] + 1.*^-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[phi]^2* (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)*Cos[theta]* Sin[theta]^3 + 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)* Sin[4*theta])) - 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)* (-12*((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)* Sin[phi]^2*Sin[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)*(4*Sin[phi]^2* Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*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)* (12*((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)* Sin[phi]^2*Sin[theta]^2*(-1 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)* ((-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[phi]* (4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])))^2)/(8 - 2.*^-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*Sin[phi]^2* Sin[theta]^2 - 4.3199999999999997*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 7.2*^-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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 4.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))^ 2 - (1.*^-6*(-2.*^-12*(-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)*((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[phi]^2* Sin[theta]^2 - 7.5*^-7*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*((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)*Cos[phi]* Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^3 - 0.000648*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*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*(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[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - (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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]))/4 - (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)* ((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]))/4 - ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*((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)*Cos[phi]^2*Sin[2*theta]^2)/2 + 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* ((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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^ 3 + Cos[phi]^2*Sin[2*theta]^3) + 72*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*(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)*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^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)^2*Cos[phi]* ((((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*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*theta]))/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*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)* ((-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[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))* (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* Cos[phi]*(-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)* Cos[theta]*Sin[phi]^2*Sin[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)*(4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + Cos[phi]*(-4.*^-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[phi]*Cos[2*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)*Sin[2*theta] + 1.*^-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[phi]^2*(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)*Cos[theta]* Sin[theta]^3 + 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)*Sin[4*theta])) - 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)*(-12*((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)* Sin[phi]^2*Sin[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)*(4*Sin[phi]^2* Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*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)* (12*((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)* Sin[phi]^2*Sin[theta]^2*(-1 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)* ((-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[phi]* (4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]))) + (8 - 2.*^-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*Sin[phi]^2*Sin[theta]^ 2 - 4.3199999999999997*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 7.2*^-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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 4.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))* (7.200000000000001*^-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)*((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[phi]* (-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)* Cos[theta]*Sin[phi]^2*Sin[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)*(4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + 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* Cos[phi]*(-6*((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)*Cos[theta]*Sin[phi]^2*Sin[theta]^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)*(4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + Cos[phi]*(-4.*^-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[phi]*Cos[2*theta]^2 - 4.*^-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[phi]* Cos[2*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)*Sin[2*theta] + 2.*^-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[phi]^2*(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)*Cos[theta]* Sin[theta]^3 + 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)*Sin[4*theta]) + 1.*^-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[phi]^2* (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)*Cos[theta]* Sin[theta]^3 + 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)*Sin[4*theta])) - 5.*^-7*((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)* (-12*((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)* Sin[phi]^2*Sin[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)*(4*Sin[phi]^2* Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])) - 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)*(-12*((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)*Sin[phi]^2*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)*(4*Sin[phi]^2* Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2))/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)^2*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)* ((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*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)* (12*((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)* Sin[phi]^2*Sin[theta]^2*(-1 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)* ((-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[phi]* (4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)*(0.000012*((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)*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 12*((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)*Sin[phi]^2*Sin[theta]^2*(-1 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 2.5*^-7* ((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*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^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)*(-2*Sin[phi]^2* Sin[theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 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)^2*Cos[phi]*(4*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*((-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[phi]* (4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])))))/(-8 + 2.*^-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*Sin[phi]^2* Sin[theta]^2 + 4.3199999999999997*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 - 7.2*^-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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 4.*^-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))^ 2 - (1.25*^-13*(4*Cos[phi]*Cos[2*theta] + 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)* (2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*((-2.5*^-7*(-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)*((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)*Cos[phi]* Sin[2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]*Cos[2*theta]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) - (5.*^-13*Sin[phi]^2*Sin[theta]*((((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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* Cos[phi]*Sin[2*theta] - 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*Cos[phi]^2*Sin[2*theta]^ 2))/2 - 2.5*^-13*(-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* ((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)*Cos[theta]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta]) + 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)*((-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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*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)*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]) + 1.*^-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]* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta])))* ((-2.5*^-7*((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)*Cos[phi]*Csc[theta]*Sin[2*theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*((-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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (4 - 1.*^-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*Sin[phi]^2*Sin[theta]^2 - 2.1599999999999998*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 7.5*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 2.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - 1.*^-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[phi]* Sin[theta]*((-5.*^-13*r*(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*Cos[phi]* (-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)* Cos[theta]*Sin[phi]^2*Sin[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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + Cos[phi]* (-4.*^-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[phi]*Cos[2*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)*Sin[2*theta] + 1.*^-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[phi]^2* (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)*Cos[theta]*Sin[theta]^3 + 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)* Sin[4*theta])) - 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)* (-12*((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)* Sin[phi]^2*Sin[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)*(4*Sin[phi]^2* Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*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)*(12*((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)*Sin[phi]^2*Sin[theta]^2* (-1 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)* ((-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[phi]* (4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])))*((-2.5*^-7*(-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)*((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)*Cos[phi]* Sin[2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]*Cos[2*theta]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (8 - 2.*^-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*Sin[phi]^2*Sin[theta]^2 - 4.3199999999999997*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 7.2*^-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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 4.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) - 2.5*^-13*r*((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)* ((-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-2.5*^-7*(-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)* ((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)*Cos[phi]*Sin[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 2.5*^-13*r*Sin[phi]^2*Sin[theta]*((-2.5*^-7* ((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)*Cos[phi]*Csc[theta]*Sin[2*theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*((-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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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) + ((-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)*Sin[theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Cos[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 5.*^-7*r*((2.5*^-13*(-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)* ((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)*Cos[phi]*Sin[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]*Sin[phi]^2*Sin[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)* Cos[2*theta] + (((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.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* 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)*Cos[phi]*Cos[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[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)*Cos[2*theta] + (((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.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2 - (2.5*^-7*((-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)*((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)*Cos[phi]*Sin[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (2.5*^-7*(-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)*((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)*Cos[phi]* Sin[2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*Cos[phi]*Cos[2*theta]*(2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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) + ((-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)*Sin[phi]^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) + ((-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)*Cos[phi]*Sin[2*theta]*(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)*Cos[phi]*Sin[2*theta]) + (((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)*Cos[phi]* Sin[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))/4))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (((-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[phi]* Cos[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (2.5*^-7*(-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)*((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)*Cos[phi]* Sin[2*theta]*(-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) + ((-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)*Cos[theta]* Sin[phi]^2*Sin[theta] - 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) + ((-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)*Cos[phi]^2* Sin[4*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (1.*^-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)* (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) + ((-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)*Cos[phi]*Sin[phi]^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)* Cos[2*theta] + (((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))/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (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*((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)*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (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) + ((-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)/2)*Sin[phi]^2* 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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (1.9999999999999998*^-18*(-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) + ((-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)*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (-3.75*^-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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^3 + 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* Cos[phi]*(-18*((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]*Sin[phi]^2*Sin[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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(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)* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - (((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 4.*^-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[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])))/4 + 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)*((((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2)/4 - 12*((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)* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)*((-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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*((-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[phi]^2*Cos[2*theta]^2 + Cos[theta]^2* Sin[phi]^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)* Cos[phi]*((((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*Cos[theta]^3*Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] - Sin[phi]^2* Sin[4*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*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))^ 2)) + r^2*Sin[theta]^2*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])*((-5.*^-13*Sin[phi]*(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*Cos[phi]* (-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)* Cos[theta]*Sin[phi]^2*Sin[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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + Cos[phi]* (-4.*^-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[phi]*Cos[2*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)*Sin[2*theta] + 1.*^-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[phi]^2* (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)*Cos[theta]*Sin[theta]^3 + 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)* Sin[4*theta])) - 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)* (-12*((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)* Sin[phi]^2*Sin[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)*(4*Sin[phi]^2* Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*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)*(12*((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)*Sin[phi]^2*Sin[theta]^2* (-1 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)* ((-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[phi]* (4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])))*((-2.5*^-7*((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)*Cos[phi]*Csc[theta]* Sin[2*theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*((-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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (8 - 2.*^-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*Sin[phi]^2*Sin[theta]^2 - 4.3199999999999997*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 7.2*^-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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 4.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) - 2.5*^-13*Sin[phi]*((-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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-2.5*^-7*((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)*Cos[phi]*Csc[theta]*Sin[2*theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*((-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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 2.5*^-13*Sin[phi]*((-2.5*^-7*(-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)*((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)*Cos[phi]* Sin[2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 5.*^-7*Sin[phi]*((2.5*^-13*((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)*Cos[phi]*Csc[theta]* Sin[2*theta]*(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)^2* Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]*Sin[phi]^2*Sin[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)* Cos[2*theta] + (((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.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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) + ((-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)*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[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)*Cos[2*theta] + (((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.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2 - (2.5*^-7*((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)*Cos[phi]* Csc[theta]*Sin[2*theta]*(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)^2* Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (2.5*^-7*((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)*Cos[phi]*Csc[theta]* Sin[2*theta]*(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)* ((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]*(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)*Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Cos[phi]*(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)* ((-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[phi]*Cos[2*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)*Sin[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)*Cos[phi]*Sin[2*theta]))/ 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)* Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)/2)* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*Cos[phi]^2*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)*Cos[2*theta] + (((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))/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (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)^2*Cos[phi]* 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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (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)* ((-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (1.9999999999999998*^-18*(-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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (-3.75*^-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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^3 + 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* Cos[phi]*(-18*((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]*Sin[phi]^2*Sin[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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(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)* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - (((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 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)*((-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)*(-4*Cos[phi]*Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]* Sin[2*phi]*Sin[4*theta])))/4 + 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)*((((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2)/4 - 12*((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)* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)*((-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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*((-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[phi]^2*Cos[2*theta]^2 + Cos[theta]^2* Sin[phi]^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)* Cos[phi]*((((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*Cos[theta]^3*Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] - Sin[phi]^2* Sin[4*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*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))^ 2))))/(Sqrt[2]*r))/2 + ((I*Csc[theta]*(r^2*Sin[theta]^2*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])*((1.25*^-13*Sin[phi]*(4*Cos[phi]*Cos[2*theta] + 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)* (2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*((-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)*Cos[phi]*Cos[2*theta]* Csc[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + (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))/4)*Csc[theta]^2* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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)*(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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (2 + 4.*^-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[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[2*theta] - 2.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)*Cos[phi]*Sin[2*theta]))/(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + (5.*^-7*Sin[phi]*((1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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]*Sin[phi]^2*Sin[2*theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (Csc[theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))*(Cos[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)*Cos[phi]*Sin[3*theta] + 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)*Cos[phi]*Sin[3*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*Sin[phi]^2* (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)*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 - 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*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) + (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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r - (2.5*^-13*Sin[phi]*((-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) + ((-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)*Sin[phi]^2* Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* (-((Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r + (2.5*^-13*Sin[phi]*((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)*((-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[phi]*Cos[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* (-((Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r + (2.5*^-7*Sin[phi]*(1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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* Cos[phi]*Sin[2*theta]) - 6.*^-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)*(-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))* ((-2.5*^-7*((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)*Cos[phi]*Csc[theta]*Sin[2*theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*((-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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta])))) - (5.*^-7*Sin[phi]* ((-5.*^-7*(-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 + 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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* 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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]))))*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r - (5.*^-7*Sin[phi]*((1.*^-6*Csc[theta]*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta]))* (-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[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)*Cos[2*theta] + (((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.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]* (Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[ 2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^2 + (1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]*Sin[phi]^2*Sin[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)* Cos[2*theta] + (((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.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]* (Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[ 2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^2 - (1.*^-6* (((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 + (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))/4)*Cos[phi]* Csc[theta]*Sin[2*theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (Csc[theta]*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)* ((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]*(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)*Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Cos[phi]* (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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (((-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 + 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) - (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 + 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) + ((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)/2))* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (6.*^-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)*(-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[phi]^2*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)* Cos[2*theta] + (((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))/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (6.*^-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)*Cos[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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)* ((-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (1.1999999999999998*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*Cos[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (-3.75*^-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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^3 + 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* Cos[phi]*(-18*((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]*Sin[phi]^2*Sin[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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(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)* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (1 + 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)* Cos[phi]*Sin[2*theta]) - (((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*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)* Cos[phi]*Sin[2*theta]))/4 - 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)* ((-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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))/4 + 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)*((((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2)/4 - 12*((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)* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)*((-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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*((-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[phi]^2*Cos[2*theta]^2 + Cos[theta]^2* Sin[phi]^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)* Cos[phi]*((((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*Cos[theta]^3* Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*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*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])))))/(-2 + 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))^2))/r + (5.*^-7*Sin[phi]* ((-6.*^-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)* ((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]^2*Cos[2*theta]^2)/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (5.*^-7*((-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*Cos[2*theta]*Cot[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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (2.*^-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*Sin[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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*((-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[phi]*Cos[2*theta]*Cot[theta]*(-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Csc[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (5.*^-13*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta])*(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)^ 2*Sin[phi]^2*Sin[theta]*(-Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] + 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)*Cos[phi]*Sin[theta]^3) + 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)^2*Cos[theta]*Sin[phi]^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)* Cos[phi]*(Cos[theta] - 3*Cos[3*theta]) - 2*Sin[theta]* (1 + 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[phi]*Cos[theta]*Sin[theta])) - 2.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 4*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Cos[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])) + 4*Cos[phi]*Cos[2*theta]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[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)/4 - 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)^2*Cos[phi]*Sin[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 + 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)*Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[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)*Cos[theta] - 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)^2*Cos[phi]*(2 + 3*Cos[2*theta])*Sin[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)*(Cos[theta] + 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)*Cos[phi]*(Sin[theta] - 3*Sin[3*theta])) + 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* Cos[phi]*(Sin[theta] - 3*Sin[3*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^2 + (5.*^-7* ((-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)*Cot[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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])* (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)^2*Sin[phi]^2*Sin[theta]* (-Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] + 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)*Cos[phi]*Sin[theta]^ 3) + 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)^2*Cos[theta]*Sin[phi]^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)* Cos[phi]*(Cos[theta] - 3*Cos[3*theta]) - 2*Sin[theta]* (1 + 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[phi]*Cos[theta]*Sin[theta])) - 2.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 4*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Cos[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])) + 4*Cos[phi]*Cos[2*theta]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[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)/4 - 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)^2*Cos[phi]*Sin[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 + 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)*Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[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)*Cos[theta] - 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)^2*Cos[phi]*(2 + 3*Cos[2*theta])*Sin[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)*(Cos[theta] + 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)*Cos[phi]*(Sin[theta] - 3*Sin[3*theta])) + 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* Cos[phi]*(Sin[theta] - 3*Sin[3*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^2 + (6.*^-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)*Cos[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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)*Cos[phi]*Sin[2*theta]* (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)*Cos[phi]*Sin[2*theta] + 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)*Cos[phi]*Sin[2*theta]))/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (1.1999999999999998*^-17*((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)* Cos[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta]* (-0.000054*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*(1 + 2*Cos[2*theta])*Sin[phi]^2*Sin[theta]^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)^2*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*theta]))/8 - 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*(Cos[theta]*Sin[phi]^2* Sin[theta] - 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)*Cos[phi]* (4*(1 + 2*Cos[2*theta])*Sin[phi]^2*Sin[theta]^2 + 3*Cos[phi]^2*Cos[2*theta]*Sin[2*theta]^2) + Cos[phi]^2* Sin[4*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)^ 2*(-1.25*^-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)*Cos[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) - 2*(Cos[2*theta] - 3*Cos[4*theta])* Sin[phi]^2) + Sin[phi]^2*Sin[2*theta] + 2*Cos[phi]^2* Sin[4*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.*^-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[phi]*(3*Cos[2*(phi - 3*theta)] - 4*Cos[2*(phi - 2*theta)] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + 8*Cos[4*theta] + 6*Cos[6*theta] + Cos[2*(phi + theta)] - 4*Cos[2*(phi + 2*theta)] + 3*Cos[2*(phi + 3*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)*Sin[theta]* (16*Cos[theta]*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)]) + 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)*(9*Sin[phi - 5*theta] + 3*Sin[3*phi - 5*theta] + 17*Sin[phi - 3*theta] - 5*Sin[3*(phi - theta)] + 5*Sin[3*(phi + theta)] - 17*Sin[phi + 3*theta] - 9*Sin[phi + 5*theta] - 3*Sin[3*phi + 5*theta])))/ 4))/8))/(-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))^2))/r) - 1.*^-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[phi]* Sin[theta]*((1.25*^-7*(4*Cos[phi]*Cos[2*theta] + 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)* (2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*((-5.*^-13*(-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + ((-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] - 4.*^-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[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (2.*^-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Sin[phi]^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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) - 5.*^-7*((-5.*^-7*(-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 + 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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( 2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]))))*((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)*((-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[phi]*Cos[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + 5.*^-7*((-5.*^-7*(-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 + 1.*^-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[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]* Sin[2*theta])*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( 2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((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)* ((-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + (2.5*^-7*(1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2*Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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* Cos[phi]*Sin[2*theta]) - 6.*^-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)*(-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))* ((-2.5*^-7*(-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)* ((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)*Cos[phi]*Sin[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2* Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + 2.5*^-13*Sin[phi]^2* ((2.5*^-7*(-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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)* Sin[2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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)* 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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*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) - (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)*Sin[theta]^2)* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (Cos[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)* Cos[phi]*Sin[3*theta] + 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)*Cos[phi]*Sin[3*theta]))/( 2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 2.5*^-13*Sin[phi]^2*Sin[theta]*(-((Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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) + ((-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)*Sin[theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Cos[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 5.*^-7*((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)* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]* Sin[2*theta])*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[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)*Cos[2*theta] + (((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.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Sin[2*theta] - 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)*Cos[phi]* Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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)*Cos[phi]*Cos[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[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)*Cos[2*theta] + (((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.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Sin[2*theta] - 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)*Cos[phi]* Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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)* (((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 + (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))/4)*Cos[phi]* Sin[2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]* (2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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) + ((-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)*Sin[phi]^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) + ((-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)*Cos[phi]*Sin[2*theta]*(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)*Cos[phi]*Sin[2*theta]) + (((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)*Cos[phi]* Sin[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))/4))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)* Cos[phi]*Cos[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]* Sin[2*theta])*(-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) + ((-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)*Cos[theta]* Sin[phi]^2*Sin[theta] - 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) + ((-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)*Cos[phi]^2* Sin[4*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*((-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 + 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) - (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 + 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) + ((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)/2))*Sin[phi]^2* 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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (2.*^-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)* (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Cos[phi]*Sin[phi]^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)* Cos[2*theta] + (((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 + 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (2.*^-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)*(-336/(E^(r^2/4)* r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (1.9999999999999998*^-18*(-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (-3.75*^-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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^3 + 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* Cos[phi]*(-18*((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]*Sin[phi]^2*Sin[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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(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)* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - (((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 4.*^-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[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])))/4 + 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)*((((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2)/4 - 12*((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)* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)*((-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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*((-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[phi]^2*Cos[2*theta]^2 + Cos[theta]^2* Sin[phi]^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)* Cos[phi]*((((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*Cos[theta]^3*Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] - Sin[phi]^2* Sin[4*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*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))^2) + 5.*^-7*((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)* ((-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[phi]*Cos[2*theta]* (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)*(Cos[phi]^2*Cos[4*theta] + Cos[2*theta]*Sin[phi]^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)* (2*Cos[phi]^2*Cos[4*theta] + Cos[2*theta]*Sin[phi]^2) - 2*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]*Sin[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)* Cos[phi]*Cos[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (5.*^-13*(-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[phi]*Cos[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(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)^2* Sin[phi]^2*Sin[theta]*(-Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] + 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)*Cos[phi]*Sin[theta]^3) + 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)^2*Cos[theta]*Sin[phi]^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)*Cos[phi]* (Cos[theta] - 3*Cos[3*theta]) - 2*Sin[theta]* (1 + 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[phi]*Cos[theta]*Sin[theta])) + 4*Cos[phi]* 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)/4 + 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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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)^2*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]) - 2.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 4*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Cos[2*theta]* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[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)*Cos[theta] - 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)^ 2*Cos[phi]*(2 + 3*Cos[2*theta])*Sin[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)* (Cos[theta] + 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)*Cos[phi]* (Sin[theta] - 3*Sin[3*theta])) + 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* Cos[phi]*(Sin[theta] - 3*Sin[3*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2 - (1.5*^-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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))* (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)^2*Sin[phi]^2*Sin[theta]* (-Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] + 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)*Cos[phi]*Sin[theta]^3) + 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)^2*Cos[theta]*Sin[phi]^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)*Cos[phi]* (Cos[theta] - 3*Cos[3*theta]) - 2*Sin[theta]* (1 + 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[phi]*Cos[theta]*Sin[theta])) + 4*Cos[phi]* 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)/4 + 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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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)^2*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]) - 2.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 4*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Cos[2*theta]* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[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)*Cos[theta] - 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)^ 2*Cos[phi]*(2 + 3*Cos[2*theta])*Sin[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)* (Cos[theta] + 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)*Cos[phi]* (Sin[theta] - 3*Sin[3*theta])) + 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* Cos[phi]*(Sin[theta] - 3*Sin[3*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2 + (6.*^-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)* Cos[phi]*Sin[2*theta]*(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*Cos[theta]*Sin[phi]^2* Sin[theta] + 6.25*^-8*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)^2*(4*Cos[theta]* Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*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)* (Cos[phi]*Cos[2*theta] - 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)*(4*Cos[theta]*Sin[phi]^2* Sin[theta] + Cos[phi]^2*Sin[4*theta]))))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (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)* ((-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[phi]^2* 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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (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)* ((-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[phi]^2* Sin[theta]*(Csc[theta]^2 + 1.*^-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[phi]*Cos[theta]* Sin[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)*Cos[phi]*Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (3.9999999999999995*^-18*(-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]*Sin[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (-0.000054*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*(1 + 2*Cos[2*theta])*Sin[phi]^2*Sin[theta]^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)^2*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*theta]))/8 - 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*(Cos[theta]*Sin[phi]^2* Sin[theta] - 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)*Cos[phi]* (4*(1 + 2*Cos[2*theta])*Sin[phi]^2*Sin[theta]^2 + 3*Cos[phi]^2*Cos[2*theta]*Sin[2*theta]^2) + Cos[phi]^2* Sin[4*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)^2*(-1.25*^-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)*Cos[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) - 2*(Cos[2*theta] - 3*Cos[4*theta])* Sin[phi]^2) + Sin[phi]^2*Sin[2*theta] + 2*Cos[phi]^2* Sin[4*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)*(4.*^-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[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[ 6*theta]) + 4*Cos[4*theta]*Sin[phi]^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)*Sin[theta]*(16*Cos[theta]*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)]) + 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)*(9*Sin[phi - 5*theta] + 3*Sin[3*phi - 5*theta] + 17*Sin[phi - 3*theta] - 5*Sin[3*(phi - theta)] + 5*Sin[3*(phi + theta)] - 17*Sin[phi + 3*theta] - 9*Sin[phi + 5*theta] - 3*Sin[3*phi + 5*theta])))/4))/8))/(-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))^ 2)) - 1.*^-6*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Sin[theta]^2* (-1/2*(1.*^-6*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[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)*Cos[2*theta] + (((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.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Sin[2*theta] - 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)*Cos[phi]* Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))*(1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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* Cos[phi]*Sin[2*theta]) - 6.*^-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)*(-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[phi]*Cos[2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]*Cos[2*theta]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))) - 1.*^-6* (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))*(1.*^-6*((-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 + 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) - (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 + 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) + ((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)/2))*Sin[phi]^2* Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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* Cos[phi]*Sin[2*theta]) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]^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)*Cos[phi]* Sin[2*theta])/4 - 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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]^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)* (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) + ((-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)*Cos[phi]^2* Sin[2*theta]^2) + 1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* Sin[theta]^2*(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)* ((-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[phi]*Cos[2*theta]* Cot[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)* (-1 + 1.*^-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[phi]*Cos[theta]*Sin[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)* Cos[phi]*Sin[2*theta]) + (((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)* Cos[phi]*Sin[2*theta]))/2) - 6.*^-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)*Cos[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[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)*((-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[phi]*Cos[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (((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 + (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))/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[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)* (-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[phi]*Cos[2*theta]* (-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) + ((-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)*Cos[theta]* Sin[phi]^2*Sin[theta] - 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) + ((-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)*Cos[phi]^2* Sin[4*theta])))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2) + (5.*^-7*(1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2*Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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* Cos[phi]*Sin[2*theta]) - 6.*^-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)*(-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))*(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*Cos[phi]* (-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)* Cos[theta]*Sin[phi]^2*Sin[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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + Cos[phi]* (-4.*^-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[phi]*Cos[2*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)*Sin[2*theta] + 1.*^-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[phi]^2* (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)*Cos[theta]*Sin[theta]^3 + 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)* Sin[4*theta])) - 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)* (-12*((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)* Sin[phi]^2*Sin[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)*(4*Sin[phi]^2* Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*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)*(12*((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)*Sin[phi]^2*Sin[theta]^2* (-1 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)* ((-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[phi]* (4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]))))/(r*(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])))* (8 - 2.*^-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*Sin[phi]^2*Sin[theta]^2 - 4.3199999999999997*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 7.2*^-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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 4.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + (6.25*^-14*Csc[theta]*(4*Cos[phi]* Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*(0.000072*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*Cos[phi]*Cos[theta]^2 + Cot[theta])*Sin[phi]^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)*Csc[theta]^2* (4 - 2.*^-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[phi]*Cos[theta]*Sin[theta] - 1.*^-6*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)*Cos[phi]* Cos[theta]*Sin[theta])*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta]))/4 + 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)^2*(Cos[phi]^2*(Cos[theta] + Cos[3*theta])*Csc[theta] + 6*Cot[theta]*Sin[phi]^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)*Cos[phi]*(12*Cos[theta]^2* Sin[phi]^2 + Cos[phi]^2*Cot[theta]*Sin[4*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)* (-(Cos[phi]*(-1 + Cot[theta]^2)) + 0.000021* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*Cot[theta]* Sin[phi]^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*Cos[phi]*(14*Cos[theta]^2* Sin[phi]^2 + Cos[phi]^2*Cot[theta]*Sin[4*theta])) + 8.*^-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[phi]*(-(Cos[phi]*(Cos[theta] + Cos[3*theta])* Csc[theta]) + 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)*(-4*Cos[theta]^2* Sin[phi]^2 + Cos[2*theta]*Cot[theta]^2*Sin[phi]^2 - Cos[phi]^2*Cot[theta]*Sin[4*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)* (2*Cos[theta]^2*Sin[phi]^2 + Cot[theta]*(-(Cos[2*theta]* Cot[theta]*Sin[phi]^2) + Cos[phi]^2*Sin[4*theta])))))/ (r*(-Csc[theta]^3 + 1.*^-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[phi]^2* Cos[2*theta]^2*Csc[theta]^3 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2 + 1.*^-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*Cot[theta]^2* Csc[theta]*Sin[phi]^2 + 4.999999999999999*^-19* (-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* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*(Cos[phi]^2*Cos[2*theta]^2*Cot[theta]*Csc[theta] + Cos[theta]*(-2 + Cot[theta]^2)*Sin[phi]^2) + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^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*(4*Cos[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^2 - 2.*^-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[phi]*Cos[theta]*(Cos[phi]^2*Cos[theta]^2 + Sin[phi]^2)) + 6.*^-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.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)^2*Cos[phi]*Cos[theta]* (Cos[phi]^2*Cos[theta]^2 + Sin[phi]^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)^2*Cos[phi]*Cos[2*theta]* Cot[theta]*Csc[theta]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^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)*(Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2))/2))*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - (2.5*^-7*(4*Cos[phi]*Cos[2*theta] + 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)* (2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*((-5.*^-7*(-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 + 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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* 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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))))/(r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - (2.5*^-7*(1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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* Cos[phi]*Sin[2*theta]) - 6.*^-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)*(-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))* ((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)* ((-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta])))) - (5.*^-13*Sin[phi]^2*Sin[theta]* ((((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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*Cos[phi]*Sin[2*theta] - 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* Cos[phi]^2*Sin[2*theta]^2))/2 - 2.5*^-13* (-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* ((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)*Cos[theta]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta]) + 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)*((-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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*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)*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]) + 1.*^-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]* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta])))* (-((Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(4 - 1.*^-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*Sin[phi]^2*Sin[theta]^2 - 2.1599999999999998*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 7.5*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 2.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + (6.25*^-14*Csc[theta]*Sin[phi]* ((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* (2.16*^-10*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]^2*Sin[phi]*(Sin[2*theta] + Sin[4*theta]) - 0.000036* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(-(Cos[2*theta]* Sin[2*phi]) + 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)*Cos[phi]^2*Sin[phi]* (4*Sin[2*theta] + 5*Sin[4*theta]) + 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)*Sin[phi]*(Sin[phi]^2* Sin[2*theta] + Cos[phi]^2*Sin[4*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)*(-8*Cot[theta]*Sin[phi] - 1.*^-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 + 4*Cos[2*theta])*Sin[2*phi] + 2.*^-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] + Cos[3*theta])*Csc[theta]*(Sin[phi] - Sin[3*phi]) + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[phi]*(2*Sin[2*theta] + 3*Sin[4*theta]) + 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)* (2*Cos[2*theta]*Sin[2*phi] - 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)* Sin[phi]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]) + 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[phi]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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)*(8.*^-6*Sin[phi]^3* Sin[2*theta] + 6.*^-6*Cos[phi]^2*Sin[phi]*Sin[ 4*theta]))/4)) + 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)* (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) + r*(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) + (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))*Cos[2*theta]* Sin[2*phi] + 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)^2*((Cos[theta]^2 + Cos[2*theta])*Sin[2*phi] - 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)* Sin[phi]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*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)*(4*Cot[theta]*Sin[phi] + 5.*^-13*(-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*(2 - 2*Cos[2*phi] + 5*Cos[2*(phi - theta)] - 2*Cos[2*theta] + 5*Cos[2*(phi + theta)])*Cot[theta]*Sin[phi] + 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)*(-4*Cos[2*theta]* Sin[2*phi] + 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)* Sin[phi]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta]) - 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[phi]* (4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*theta]))))/4)))/(r*(-Csc[theta]^3 + 1.*^-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[phi]^2* Cos[2*theta]^2*Csc[theta]^3 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2 + 1.*^-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*Cot[theta]^2* Csc[theta]*Sin[phi]^2 + 4.999999999999999*^-19* (-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* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*(Cos[phi]^2*Cos[2*theta]^2*Cot[theta]*Csc[theta] + Cos[theta]*(-2 + Cot[theta]^2)*Sin[phi]^2) + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^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*(4*Cos[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^2 - 2.*^-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[phi]*Cos[theta]*(Cos[phi]^2*Cos[theta]^2 + Sin[phi]^2)) + 6.*^-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.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)^2*Cos[phi]*Cos[theta]* (Cos[phi]^2*Cos[theta]^2 + Sin[phi]^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)^2*Cos[phi]*Cos[2*theta]* Cot[theta]*Csc[theta]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^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)*(Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2))/2))) + (2.5*^-7*(-2.*^-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[phi]*Cos[2*theta]*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) + (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)*Cos[2*theta]*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + 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)* Cos[2*theta]*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)]) - 8*Cos[phi]* Sin[2*theta] + 0.000024*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*Cos[phi]^2*Sin[2*theta]^2 - 2.*^-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[phi]^2*Sin[2*theta]^2)*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) - 5.*^-13* (4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*(-0.000216*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*(1 + 2*Cos[2*theta])* Sin[phi]^2*Sin[theta]^2 - 72*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)^2*(Cos[theta]*Sin[phi]^2* Sin[theta] - 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)*Cos[phi]* (4*(1 + 2*Cos[2*theta])*Sin[phi]^2*Sin[theta]^2 + 3*Cos[phi]^2*Cos[2*theta]*Sin[2*theta]^2) + Cos[phi]^2* Sin[4*theta]) - 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)^2*(2*Sin[phi]^2* Sin[2*theta] + Cos[phi]^2*Sin[4*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*(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)*Cos[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) - 2*(Cos[2*theta] - 3*Cos[4*theta])* Sin[phi]^2) - 2*(Sin[phi]^2*Sin[2*theta] + 2*Cos[phi]^2*Sin[4*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)* (4.*^-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[phi]*(Cos[phi]^2* (Cos[2*theta] + 3*Cos[6*theta]) + 4*Cos[4*theta]* Sin[phi]^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)*Sin[theta]* (16*Cos[theta]*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)]) + 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)*(9*Sin[phi - 5*theta] + 3*Sin[3*phi - 5*theta] + 17*Sin[phi - 3*theta] - 5*Sin[3*(phi - theta)] + 5*Sin[3*(phi + theta)] - 17*Sin[phi + 3*theta] - 9*Sin[phi + 5*theta] - 3*Sin[3*phi + 5*theta])))/4))/ 2)))/(r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))^2))))/ (Sqrt[2]*r) - (-1.*^-6*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r* (3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Sin[theta]^2* ((1.25*^-13*Sin[phi]*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]*Sin[2*theta]))* ((-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)* Cos[phi]*Cos[2*theta]*Csc[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + (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))/4)*Csc[theta]^2* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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)*(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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (2 + 4.*^-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[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[2*theta] - 2.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)*Cos[phi]*Sin[2*theta]))/(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + (5.*^-7*Sin[phi]* ((1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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]*Sin[phi]^2*Sin[2*theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (Csc[theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))* (Cos[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)* Cos[phi]*Sin[3*theta] + 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)*Cos[phi]*Sin[3*theta]))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*Sin[phi]^2* (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)*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 - 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*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) + (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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( 2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/r - (2.5*^-13*Sin[phi]*((-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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* (-((Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/r + (2.5*^-13*Sin[phi]*((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)*((-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[phi]*Cos[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* (-((Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/r + (2.5*^-7*Sin[phi]*(1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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*Cos[phi]*Sin[2*theta]) - 6.*^-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)*( -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[phi]*Cos[2*theta]*( -1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))* ((-2.5*^-7*((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)*Cos[phi]*Csc[theta]*Sin[2*theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*((-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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2* Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))) - (5.*^-7*Sin[phi]* ((-5.*^-7*(-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 + 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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( 2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]))))*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/r - (5.*^-7*Sin[phi]*((1.*^-6*Csc[theta]*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^2* Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]*Sin[phi]^2*Sin[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)* Cos[2*theta] + (((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.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Sin[2*theta] - 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)*Cos[phi]* Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2 + (1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[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)*Cos[2*theta] + (((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.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Sin[2*theta] - 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)*Cos[phi]* Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2 - (1.*^-6* (((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 + (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))/4)*Cos[phi]* Csc[theta]*Sin[2*theta]*(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)^2* Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (Csc[theta]*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)* ((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]*(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)*Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Cos[phi]*(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)* ((-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[phi]*Cos[2*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)*Sin[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)*Cos[phi]*Sin[2*theta]))/ 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)* Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (((-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 + 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) - (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 + 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) + ((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)/2))* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (6.*^-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)*(-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[phi]^2*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)* Cos[2*theta] + (((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))/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (6.*^-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)*Cos[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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)* ((-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (1.1999999999999998*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*Cos[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (-3.75*^-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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^3 + 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* Cos[phi]*(-18*((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]*Sin[phi]^2*Sin[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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(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)* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (1 + 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)* Cos[phi]*Sin[2*theta]) - (((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*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)* Cos[phi]*Sin[2*theta]))/4 - 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)* ((-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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))/4 + 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)*((((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2)/4 - 12*((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)* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)*((-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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*((-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[phi]^2*Cos[2*theta]^2 + Cos[theta]^2* Sin[phi]^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)* Cos[phi]*((((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*Cos[theta]^3*Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] - Sin[phi]^2* Sin[4*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*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))^2))/ r + (5.*^-7*Sin[phi]*((-6.*^-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)*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]^2*Cos[2*theta]^2)/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (5.*^-7*((-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*Cos[2*theta]*Cot[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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (2.*^-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*Sin[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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*((-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[phi]*Cos[2*theta]*Cot[theta]*(-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Csc[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (5.*^-13*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta])*(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)^2* Sin[phi]^2*Sin[theta]*(-Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] + 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)*Cos[phi]*Sin[theta]^3) + 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)^2*Cos[theta]*Sin[phi]^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)*Cos[phi]* (Cos[theta] - 3*Cos[3*theta]) - 2*Sin[theta]* (1 + 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[phi]*Cos[theta]*Sin[theta])) - 2.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 4*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Cos[2*theta]* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])) + 4*Cos[phi]*Cos[2*theta]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[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)/4 - 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)^2*Cos[phi]*Sin[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 + 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)*Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[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)*Cos[theta] - 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)^2*Cos[phi]*(2 + 3*Cos[2*theta])*Sin[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)*(Cos[theta] + 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)*Cos[phi]*(Sin[theta] - 3*Sin[3*theta])) + 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* Cos[phi]*(Sin[theta] - 3*Sin[3*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2 + (5.*^-7*((-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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])*(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)^2* Sin[phi]^2*Sin[theta]*(-Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] + 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)*Cos[phi]*Sin[theta]^3) + 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)^2*Cos[theta]*Sin[phi]^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)*Cos[phi]* (Cos[theta] - 3*Cos[3*theta]) - 2*Sin[theta]* (1 + 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[phi]*Cos[theta]*Sin[theta])) - 2.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 4*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Cos[2*theta]* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])) + 4*Cos[phi]*Cos[2*theta]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[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)/4 - 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)^2*Cos[phi]*Sin[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 + 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)*Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[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)*Cos[theta] - 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)^2*Cos[phi]*(2 + 3*Cos[2*theta])*Sin[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)*(Cos[theta] + 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)*Cos[phi]*(Sin[theta] - 3*Sin[3*theta])) + 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* Cos[phi]*(Sin[theta] - 3*Sin[3*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2 + (6.*^-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)*Cos[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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)*Cos[phi]*Sin[2*theta]* (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)*Cos[phi]*Sin[2*theta] + 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)*Cos[phi]*Sin[2*theta]))/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (1.1999999999999998*^-17*((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)*Cos[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta]*(-0.000054*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*(1 + 2*Cos[2*theta])* Sin[phi]^2*Sin[theta]^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)^2*(4*Cos[theta]* Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta]))/8 - 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* (Cos[theta]*Sin[phi]^2*Sin[theta] - 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)*Cos[phi]*(4*(1 + 2*Cos[2*theta])*Sin[phi]^2* Sin[theta]^2 + 3*Cos[phi]^2*Cos[2*theta]*Sin[2*theta]^ 2) + Cos[phi]^2*Sin[4*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)^2* (-1.25*^-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)*Cos[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) - 2*(Cos[2*theta] - 3*Cos[4*theta])* Sin[phi]^2) + Sin[phi]^2*Sin[2*theta] + 2*Cos[phi]^2* Sin[4*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.*^-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[phi]*(3*Cos[2*(phi - 3*theta)] - 4*Cos[2*(phi - 2*theta)] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + 8*Cos[4*theta] + 6*Cos[6*theta] + Cos[2*(phi + theta)] - 4*Cos[2*(phi + 2*theta)] + 3*Cos[2*(phi + 3*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)*Sin[theta]* (16*Cos[theta]*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)]) + 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)*(9*Sin[phi - 5*theta] + 3*Sin[3*phi - 5*theta] + 17*Sin[phi - 3*theta] - 5*Sin[3*(phi - theta)] + 5*Sin[3*(phi + theta)] - 17*Sin[phi + 3*theta] - 9*Sin[phi + 5*theta] - 3*Sin[3*phi + 5*theta])))/4))/ 8))/(-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))^2))/ r) + 1.*^-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[phi]*Cos[2*theta]* ((1.25*^-7*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]*Sin[2*theta]))* ((-5.*^-13*(-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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*Cos[2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + ((-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] - 4.*^-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[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (2.*^-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Sin[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[ 2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)* Cos[phi]*(-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]))) - 5.*^-7*((-5.*^-7*(-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 + 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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Cos[phi]*Cos[2*theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) + (1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))))* ((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)*( (-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[phi]*Cos[2*theta]*( -1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Cos[phi]*Sin[2*theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + 5.*^-7*((-5.*^-7*(-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 + 1.*^-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[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]* Sin[2*theta])*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Cos[phi]*Cos[2*theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) + (1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((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)*( (-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[phi]*Cos[2*theta]*( -1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Cos[phi]*Sin[2*theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + (2.5*^-7*(1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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*Cos[phi]*Sin[2*theta]) - 6.*^-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)*( -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[phi]*Cos[2*theta]*( -1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))* ((-2.5*^-7*(-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)* ((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)*Cos[phi]*Sin[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2* Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + 2.5*^-13*Sin[phi]^2* ((2.5*^-7*(-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)*( 336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*Sin[2*theta]*( -1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*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)*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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*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) - (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)*Sin[theta]^2)*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Sin[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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*( Cos[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)* Cos[phi]*Sin[3*theta] + 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)*Cos[phi]*Sin[3*theta]))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]*Sin[2*theta]))/ (1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Cot[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)*Cos[phi]* Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))/ (1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Cos[phi]*(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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 2.5*^-13*Sin[phi]^2*Sin[theta]* (-((Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^2* Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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) + ((-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)*Sin[theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Cos[theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - (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) + ((-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)*Cos[phi]*Sin[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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 5.*^-7*((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)*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]* Sin[2*theta])*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[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)*Cos[2*theta] + (((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.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]*(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)*Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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)*Cos[phi]*Cos[2*theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[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)*Cos[2*theta] + (((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.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]*(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)*Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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)*(((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 + (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))/4)*Cos[phi]*Sin[ 2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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 + 1.*^-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[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]* Sin[2*theta])*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Cos[phi]*Cos[2*theta]*( 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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) + ((-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)*Sin[phi]^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) + ((-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)*Cos[phi]*Sin[2*theta]*(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)*Cos[phi]*Sin[2*theta]) + (((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)*Cos[phi]*Sin[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))/4))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) + (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)*Cos[phi]*Cos[2*theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]* Sin[2*theta])*(-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) + ((-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)*Cos[theta]* Sin[phi]^2*Sin[theta] - 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) + ((-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)*Cos[phi]^2* Sin[4*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) + (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)*((-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 + 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) - (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 + 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) + ((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)/2))*Sin[phi]^ 2*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (2.*^-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)*( -336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Cos[phi]*Sin[phi]^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)*Cos[2*theta] + (((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 + 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (2.*^-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)*(-336/(E^(r^2/4)* r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (1.9999999999999998*^-18*(-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*( -3.75*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^3 + 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*Cos[phi]* (-18*((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]*Sin[phi]^2*Sin[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)*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(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)* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - (((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 4.*^-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[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])))/4 + 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)*((((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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2)/4 - 12*((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)* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)*((-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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*((-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[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* ((((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*Cos[theta]^3* Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*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*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])))))/(-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))^2) + 5.*^-7*((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)*( (-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[phi]*Cos[2*theta]*( 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)*(Cos[phi]^2*Cos[4*theta] + Cos[2*theta]*Sin[phi]^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)* (2*Cos[phi]^2*Cos[4*theta] + Cos[2*theta]*Sin[phi]^2) - 2*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - (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)*((-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[phi]*Sin[2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) + (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)*Cos[phi]*Cos[2*theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - (5.*^-13*(-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[phi]*Cos[2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(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)^2*Sin[phi]^2*Sin[theta]* (-Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] + 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)*Cos[phi]*Sin[theta]^3) + 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)^2*Cos[theta]*Sin[phi]^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)*Cos[phi]* (Cos[theta] - 3*Cos[3*theta]) - 2*Sin[theta]* (1 + 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[phi]*Cos[theta]*Sin[theta])) + 4*Cos[phi]* 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)/4 + 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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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)^2*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]) - 2.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 4*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Cos[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[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)*Cos[theta] - 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)^ 2*Cos[phi]*(2 + 3*Cos[2*theta])*Sin[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)* (Cos[theta] + 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)*Cos[phi]* (Sin[theta] - 3*Sin[3*theta])) + 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* Cos[phi]*(Sin[theta] - 3*Sin[3*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2 - (1.5*^-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)*Cos[ phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(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)^2*Sin[phi]^2*Sin[theta]* (-Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] + 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)*Cos[phi]*Sin[theta]^3) + 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)^2*Cos[theta]*Sin[phi]^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)*Cos[phi]* (Cos[theta] - 3*Cos[3*theta]) - 2*Sin[theta]* (1 + 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[phi]*Cos[theta]*Sin[theta])) + 4*Cos[phi]* 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)/4 + 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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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)^2*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]) - 2.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 4*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Cos[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[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)*Cos[theta] - 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)^ 2*Cos[phi]*(2 + 3*Cos[2*theta])*Sin[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)* (Cos[theta] + 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)*Cos[phi]* (Sin[theta] - 3*Sin[3*theta])) + 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* Cos[phi]*(Sin[theta] - 3*Sin[3*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2 + (6.*^-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)*Cos[ phi]*Sin[2*theta]*(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*Cos[theta]*Sin[phi]^2* Sin[theta] + 6.25*^-8*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)^2*(4*Cos[theta]* Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*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)* (Cos[phi]*Cos[2*theta] - 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)*(4*Cos[theta]*Sin[phi]^2* Sin[theta] + Cos[phi]^2*Sin[4*theta]))))/ (1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - (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)*((-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[phi]^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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (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)*( (-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[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (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)*( (-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[phi]^ 2*Sin[theta]*(Csc[theta]^2 + 1.*^-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[phi]*Cos[theta]* Sin[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)*Cos[phi]*Sin[2*theta]))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (3.9999999999999995*^-18*(-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]*Sin[phi]^2*Sin[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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*( -0.000054*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*Cos[phi]* (1 + 2*Cos[2*theta])*Sin[phi]^2*Sin[theta]^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)^2*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*theta]))/8 - 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*(Cos[theta]*Sin[phi]^2* Sin[theta] - 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)*Cos[phi]* (4*(1 + 2*Cos[2*theta])*Sin[phi]^2*Sin[theta]^2 + 3*Cos[phi]^2*Cos[2*theta]*Sin[2*theta]^2) + Cos[phi]^2* Sin[4*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)^2*(-1.25*^-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)*Cos[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) - 2*(Cos[2*theta] - 3*Cos[4*theta])* Sin[phi]^2) + Sin[phi]^2*Sin[2*theta] + 2*Cos[phi]^2* Sin[4*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)*(4.*^-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[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) + 4*Cos[4*theta]*Sin[phi]^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)*Sin[theta]* (16*Cos[theta]*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)]) + 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)*(9*Sin[phi - 5*theta] + 3*Sin[3*phi - 5*theta] + 17*Sin[phi - 3*theta] - 5*Sin[3*(phi - theta)] + 5*Sin[3*(phi + theta)] - 17*Sin[phi + 3*theta] - 9*Sin[phi + 5*theta] - 3*Sin[3*phi + 5*theta])))/4))/ 8))/(-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))^2)) + r^2*(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)*Cos[phi]*Sin[2*theta])* (-1/2*(1.*^-6*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[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)*Cos[2*theta] + (((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.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* ((-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[phi]*(Cos[theta] + Cos[3*theta]) + (((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]*(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)*Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]*Cos[2*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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))*(1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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* Cos[phi]*Sin[2*theta]) - 6.*^-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)*(-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^ 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)* Cos[phi]*Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))) - 1.*^-6*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))*(1.*^-6*((-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 + 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) - (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 + 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) + ((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)/2))*Sin[phi]^2* Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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* Cos[phi]*Sin[2*theta]) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(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)*((-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[phi]^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)*Cos[phi]* Sin[2*theta])/4 - 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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]^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)* (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) + ((-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)*Cos[phi]^2* Sin[2*theta]^2) + 1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* Sin[theta]^2*(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)* ((-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[phi]*Cos[2*theta]* Cot[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)* (-1 + 1.*^-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[phi]*Cos[theta]*Sin[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)* Cos[phi]*Sin[2*theta]) + (((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)* Cos[phi]*Sin[2*theta]))/2) - 6.*^-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)*Cos[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[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)*((-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[phi]*Cos[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (((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 + (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))/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[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)*(-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[phi]*Cos[2*theta]* (-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) + ((-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)*Cos[theta]* Sin[phi]^2*Sin[theta] - 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) + ((-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)*Cos[phi]^2* Sin[4*theta])))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2) + (5.*^-7*(1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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*Cos[phi]*Sin[2*theta]) - 6.*^-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)*( -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[phi]*Cos[2*theta]*( -1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))* (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*Cos[phi]*( -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)*Cos[theta]*Sin[phi]^2* Sin[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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + Cos[phi]*(-4.*^-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[phi]*Cos[2*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)*Sin[2*theta] + 1.*^-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[phi]^2*(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)*Cos[theta]*Sin[theta]^3 + 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)* Sin[4*theta])) - 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)*(-12* ((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)*Sin[phi]^2*Sin[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)*(4*Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2* Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*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)*(12*((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)* Sin[phi]^2*Sin[theta]^2*(-1 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)*((-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[phi]*(4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))))/ (r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2* Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])))* (8 - 2.*^-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*Sin[phi]^2*Sin[theta]^2 - 4.3199999999999997*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 7.2*^-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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 4.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + (6.25*^-14*Csc[theta]* (4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]*Sin[2*theta]))* (0.000072*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*Cos[phi]* Cos[theta]^2 + Cot[theta])*Sin[phi]^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)*Csc[theta]^2* (4 - 2.*^-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[phi]*Cos[theta]*Sin[theta] - 1.*^-6*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)*Cos[phi]* Cos[theta]*Sin[theta])*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta]))/4 + 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)^ 2*(Cos[phi]^2*(Cos[theta] + Cos[3*theta])*Csc[theta] + 6*Cot[theta]*Sin[phi]^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)*Cos[phi]*(12*Cos[theta]^2* Sin[phi]^2 + Cos[phi]^2*Cot[theta]*Sin[4*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)*(-(Cos[phi]* (-1 + Cot[theta]^2)) + 0.000021*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*Cot[theta]*Sin[phi]^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*Cos[phi]* (14*Cos[theta]^2*Sin[phi]^2 + Cos[phi]^2*Cot[theta]* Sin[4*theta])) + 8.*^-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[phi]*( -(Cos[phi]*(Cos[theta] + Cos[3*theta])*Csc[theta]) + 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)*(-4*Cos[theta]^2*Sin[phi]^2 + Cos[2*theta]*Cot[theta]^2* Sin[phi]^2 - Cos[phi]^2*Cot[theta]*Sin[4*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)* (2*Cos[theta]^2*Sin[phi]^2 + Cot[theta]*(-(Cos[2*theta]* Cot[theta]*Sin[phi]^2) + Cos[phi]^2*Sin[4*theta])))))/ (r*(-Csc[theta]^3 + 1.*^-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[phi]^2*Cos[2*theta]^ 2*Csc[theta]^3 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2 + 1.*^-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*Cot[theta]^2*Csc[theta]*Sin[phi]^2 + 4.999999999999999*^-19* (-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*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*(Cos[phi]^2* Cos[2*theta]^2*Cot[theta]*Csc[theta] + Cos[theta]* (-2 + Cot[theta]^2)*Sin[phi]^2) + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^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*(4*Cos[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^2 - 2.*^-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[phi]*Cos[theta]*(Cos[phi]^2*Cos[theta]^2 + Sin[phi]^2)) + 6.*^-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.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)^2*Cos[phi]*Cos[theta]* (Cos[phi]^2*Cos[theta]^2 + Sin[phi]^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)^2*Cos[phi]*Cos[2*theta]* Cot[theta]*Csc[theta]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^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)*(Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2))/2))*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - (2.5*^-7*(4*Cos[phi]*Cos[2*theta] + 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)*( 2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]*Sin[2*theta]))* ((-5.*^-7*(-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 + 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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( 2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))))/(r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - (2.5*^-7*(1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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*Cos[phi]*Sin[2*theta]) - 6.*^-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)*( -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[phi]*Cos[2*theta]*( -1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))* ((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)* ((-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2* Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))) - (5.*^-13*Sin[phi]^2*Sin[theta]* ((((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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*Cos[phi]*Sin[2*theta] - 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* Cos[phi]^2*Sin[2*theta]^2))/2 - 2.5*^-13* (-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*((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)*Cos[theta]*( 4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*theta]) + 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)*((-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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*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)*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]) + 1.*^-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]* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta])))* (-((Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(4 - 1.*^-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*Sin[phi]^2*Sin[theta]^2 - 2.1599999999999998*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 7.5*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 2.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + (6.25*^-14*Csc[theta]*Sin[phi]* ((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* (2.16*^-10*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*Cos[phi]^ 2*Sin[phi]*(Sin[2*theta] + Sin[4*theta]) - 0.000036*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*( -(Cos[2*theta]*Sin[2*phi]) + 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)*Cos[phi]^2*Sin[phi]* (4*Sin[2*theta] + 5*Sin[4*theta]) + 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)* Sin[phi]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*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)*(-8*Cot[theta]*Sin[phi] - 1.*^-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 + 4*Cos[2*theta])*Sin[2*phi] + 2.*^-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] + Cos[3*theta])*Csc[theta]*(Sin[phi] - Sin[3*phi]) + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[phi]*(2*Sin[2*theta] + 3*Sin[4*theta]) + 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)*(2*Cos[2*theta]* Sin[2*phi] - 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)* Sin[phi]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]) + 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[phi]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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)*(8.*^-6*Sin[phi]^3* Sin[2*theta] + 6.*^-6*Cos[phi]^2*Sin[phi]*Sin[ 4*theta]))/4)) + 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)* (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) + r*(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) + (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))*Cos[2*theta]* Sin[2*phi] + 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)^2*((Cos[theta]^2 + Cos[2*theta])*Sin[2*phi] - 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)* Sin[phi]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*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)*(4*Cot[theta]*Sin[phi] + 5.*^-13*(-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*(2 - 2*Cos[2*phi] + 5*Cos[2*(phi - theta)] - 2*Cos[2*theta] + 5*Cos[2*(phi + theta)])*Cot[theta]*Sin[phi] + 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)*(-4*Cos[2*theta]* Sin[2*phi] + 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)* Sin[phi]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta]) - 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[phi]* (4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*theta]))))/4)))/(r*(-Csc[theta]^3 + 1.*^-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[phi]^2*Cos[2*theta]^2*Csc[theta]^3 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2 + 1.*^-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*Cot[theta]^2*Csc[theta]*Sin[phi]^2 + 4.999999999999999*^-19* (-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*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*(Cos[phi]^2* Cos[2*theta]^2*Cot[theta]*Csc[theta] + Cos[theta]* (-2 + Cot[theta]^2)*Sin[phi]^2) + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^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*(4*Cos[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^2 - 2.*^-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[phi]*Cos[theta]*(Cos[phi]^2*Cos[theta]^2 + Sin[phi]^2)) + 6.*^-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.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)^2*Cos[phi]*Cos[theta]* (Cos[phi]^2*Cos[theta]^2 + Sin[phi]^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)^2*Cos[phi]*Cos[2*theta]* Cot[theta]*Csc[theta]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^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)*(Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2))/2))) + (2.5*^-7*(-2.*^-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[phi]*Cos[2*theta]* (4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta])*(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) + (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)*Cos[2*theta]*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + 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)*Cos[2*theta]*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)]) - 8*Cos[phi]*Sin[2*theta] + 0.000024*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*Cos[phi]^2* Sin[2*theta]^2 - 2.*^-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[phi]^2*Sin[2*theta]^ 2)*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) - 5.*^-13*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*(-0.000216*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*(1 + 2*Cos[2*theta])* Sin[phi]^2*Sin[theta]^2 - 72*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)^2*(Cos[theta]*Sin[phi]^2* Sin[theta] - 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)*Cos[phi]* (4*(1 + 2*Cos[2*theta])*Sin[phi]^2*Sin[theta]^2 + 3*Cos[phi]^2*Cos[2*theta]*Sin[2*theta]^2) + Cos[phi]^2* Sin[4*theta]) - 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)^2*(2*Sin[phi]^2* Sin[2*theta] + Cos[phi]^2*Sin[4*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*(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)*Cos[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) - 2*(Cos[2*theta] - 3*Cos[4*theta])* Sin[phi]^2) - 2*(Sin[phi]^2*Sin[2*theta] + 2*Cos[phi]^2*Sin[4*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)*(4.*^-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[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) + 4*Cos[4*theta]*Sin[phi]^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)*Sin[theta]* (16*Cos[theta]*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)]) + 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)*(9*Sin[phi - 5*theta] + 3*Sin[3*phi - 5*theta] + 17*Sin[phi - 3*theta] - 5*Sin[3*(phi - theta)] + 5*Sin[3*(phi + theta)] - 17*Sin[phi + 3*theta] - 9*Sin[phi + 5*theta] - 3*Sin[3*phi + 5*theta])))/4))/ 2)))/(r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))^ 2)))/(Sqrt[2]*r))/2)/(Sqrt[2]*r))/2 + ((I*Csc[theta]* ((((-I)*Csc[theta]*(r^2*Sin[theta]^2*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])*((2.5*^-7*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*((1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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]*Sin[phi]^2* Sin[2*theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (Csc[theta]* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))*(Cos[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)*Cos[phi]*Sin[3*theta] + 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)*Cos[phi]*Sin[3*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (1.*^-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)*Sin[phi]^2* (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)*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 - 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*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) + (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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/(r*(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))) + (2.5*^-7*((-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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))))*((1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (3.*^-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)* (-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/r - (5.*^-13*Sin[phi]^2*Sin[theta]*( (((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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*Cos[phi]*Sin[2*theta] - 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* Cos[phi]^2*Sin[2*theta]^2))/2 - 2.5*^-13* (-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*((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)*Cos[theta]* (4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*theta]) + 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)*((-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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*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)*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]) + 1.*^-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]* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta])))*( -((Csc[theta]*(-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)*Cos[phi]* Sin[2*theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)* (-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/(r*(4 - 1.*^-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*Sin[phi]^2*Sin[theta]^2 - 2.1599999999999998*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 7.5*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 2.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))) + (2.5*^-13*Sin[phi]^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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Sin[2*theta]* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta]))*(-Cos[theta] - 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)*Cos[phi]*(-2*Sin[theta] + Sin[3*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)*Cos[phi]* (-Sin[theta] + Sin[3*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*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)*Cos[phi]*Cos[theta] + Sin[theta]*(1 - 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)* Cos[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]*Cos[theta]* Sin[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)*Cos[phi]*Sin[2*theta] + 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)*Cos[phi]*Sin[2*theta])))/(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))))*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*Cot[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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*Cos[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/r - (2.5*^-7*((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)*((-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[phi]*Cos[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))))*((1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (3.*^-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)* (-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/r - (2.5*^-13*Sin[phi]^2*Sin[theta]*( (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 - 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) + 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))*Cos[phi]*Cos[2*theta]* Csc[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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 + 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) - 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))*Csc[theta]^2*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (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)*(-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[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))))*((-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) + ((-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)*Sin[theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*Cos[theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - (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) + ((-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)*Cos[phi]* Sin[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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/r - 5.*^-7* ((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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta]))* (-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]*(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)* Cos[2*theta] + ((-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) + 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)*(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[theta]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 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) + (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)*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]*Sin[ 2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]* Cos[2*theta]^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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)* Sin[2*theta]*(-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)*Cos[phi]*Sin[ 2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]* (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)*Cos[2*theta] + ((-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) + 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)*(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[theta]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 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) + (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)*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]*Sin[ 2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]* Cos[2*theta]^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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)* Sin[2*theta]*(-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)*Cos[phi]*Sin[ 2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^2 - (1.*^-6* (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) + ((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)/2)*Sin[phi]^2* Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Sin[phi]^2* Sin[theta]*(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)*(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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]*(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)*Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta] - 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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Cos[phi]^2* Sin[2*theta]*(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)* (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[phi]*Cos[2*theta]^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)*Sin[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)*Cos[phi]*Sin[2*theta]))/ 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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((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)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (1.*^-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)*Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]* (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)*Cos[2*theta] + ((-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))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (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)*((-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[phi]^2* Sin[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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (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)* ((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]*Sin[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (1.9999999999999998*^-18*(-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]*Sin[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (-3.75*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^3 + 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* Cos[phi]*(-18*(-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)*Cos[theta]*Sin[phi]^2* Sin[theta]^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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(-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 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 4.*^-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)*Cos[phi]* (-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))/4 + 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)*(((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2)/4 - 12*(-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)*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)* (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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*(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[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (((-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*Cos[theta]^3* Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*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*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))^2) + (5.*^-7*(Cos[phi]* ((-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*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]* 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)*Cos[phi]*Sin[2*theta]))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 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)* Cos[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]* Sin[2*phi]*Sin[4*theta])))) + 1.*^-6*Sin[phi]* ((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)* ((-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*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]* Cos[2*theta]*Sin[phi]*Sin[2*theta])/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 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)*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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]*Sin[phi]*(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)* Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*Cot[theta]*Sin[phi]*Sin[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)* Cos[phi]*Sin[2*theta]))/(4*(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 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)*((-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)*Cot[theta]*Sin[phi]*Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 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)* Cos[phi]*Sin[phi]*(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)*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)*Sin[theta]^2)/2)*Sin[2*theta])/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]* Sin[2*phi]*Sin[4*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)* (-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[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]* Sin[2*phi]*Sin[4*theta]))) - (3.*^-12* ((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)*Cos[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta]* (-(Sin[phi]*Sin[theta]^2*(-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)^2*Cos[phi]*Sin[theta]^ 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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*Sin[theta]*(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)*Cos[theta]*(2 - 6*Cos[2*phi] + 3*Cos[2*(phi - theta)] + 6*Cos[ 2*theta] + 3*Cos[2*(phi + theta)]) + 16*Cos[phi]* Sin[theta]))/2 - 0.000054*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*(1 + 3*Cos[2*phi])* Sin[2*theta] + 9*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(8*Cos[phi]*(1 + 2*Cos[2*theta]) - 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)*(2 - 6*Cos[2*phi] + 3*Cos[2*(phi - theta)] + 6*Cos[2*theta] + 3*Cos[2*(phi + theta)])*Sin[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)^2*(4*(1 + 2*Cos[2*theta])* Sin[2*phi]*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)*Sin[phi]*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*Sin[phi]*(8*Cos[theta]^3*Sin[phi]^2*Sin[theta] + 4*Cos[2*phi]*Sin[4*theta] + Cos[phi]^2* (-7*Sin[2*theta] + 2*Sin[4*theta] - 3*Sin[ 6*theta])))))/(-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 3.75*^-13*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^ 2 + 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^ 3)) + 1.*^-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*(2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2* Sin[phi]^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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[ 4*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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*Cos[2*theta]*Sin[phi]*(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)* Cos[phi]*Sin[2*theta])*(1.*^-6*(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)^3* (1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^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)^2*Cos[phi]*Sin[theta]^4)/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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(-8*Cos[phi]*Sin[theta]^ 4 + 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)*(4*(1 + 3*Cos[2*phi])* Cos[theta]*Sin[theta]^3 - 3*Cos[phi]^2*Sin[2*theta]^ 3)))/4 + 9*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (-2*Cos[phi]*(1 + 2*Cos[2*theta])*Sin[theta]^2 + 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)*(-4*(1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^3 + 3*Cos[phi]^2*Sin[2*theta]^3))) + 2.5*^-7* (-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*(8*Cos[phi]*(1 + 2*Cos[2*theta])*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)*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 2*Sin[phi]^2*Sin[4*theta] + Cos[phi]^2* (-7*Sin[2*theta] + 6*Sin[4*theta] - 3*Sin[ 6*theta])))))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*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)*Cot[theta]*Sin[phi]* (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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])*(1.*^-6*(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)^3*(1 + 3*Cos[2*phi])* Cos[theta]*Sin[theta]^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)^2*Cos[phi]*Sin[theta]^4)/ 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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*(-8*Cos[phi]*Sin[theta]^4 + 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)*(4*(1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^3 - 3*Cos[phi]^2*Sin[2*theta]^3)))/4 + 9*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (-2*Cos[phi]*(1 + 2*Cos[2*theta])*Sin[theta]^2 + 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)*(-4*(1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^3 + 3*Cos[phi]^2*Sin[2*theta]^3))) + 2.5*^-7* (-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*(8*Cos[phi]*(1 + 2*Cos[2*theta])*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)*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 2*Sin[phi]^2*Sin[4*theta] + Cos[phi]^2* (-7*Sin[2*theta] + 6*Sin[4*theta] - 3*Sin[ 6*theta])))))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^ 2)))/r) - 1.*^-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[phi]*Sin[theta]* ((-1.*^-6*Sin[phi]*Sin[theta]*((((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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* Cos[phi]*Sin[2*theta] - 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*Cos[phi]^2*Sin[2*theta]^ 2))/2 - 2.5*^-13*(-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* ((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)*Cos[theta]*(4*Cos[theta]*Sin[phi]^2* Sin[theta] + Cos[phi]^2*Sin[4*theta]) + 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)* ((-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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]*Sin[phi]^2* Sin[theta] + Cos[phi]^2*Sin[4*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)* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]) + 1.*^-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]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta])))*((-5.*^-7*(-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 + 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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*Cos[phi]* Cos[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* 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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))))/(4 - 1.*^-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*Sin[phi]^2* Sin[theta]^2 - 2.1599999999999998*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 7.5*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 2.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]))) + (1.25*^-13*Sin[phi]*(4*Cos[phi]* Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*((2.5*^-7*(-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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*Sin[2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]*Cos[2*theta]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*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)*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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*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) - (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)*Sin[theta]^2)* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (Cos[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)*Cos[phi]*Sin[3*theta] + 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)*Cos[phi]*Sin[3*theta]))/(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]))) - 2.5*^-13*Sin[phi]* ((-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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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)* (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[theta]^2* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Sin[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + 2.5*^-13*Sin[phi]*((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)*((-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[phi]*Cos[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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)* (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[theta]^2* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Sin[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 2.5*^-13*r*Sin[phi]*Sin[theta]*((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)*(-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) + 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))*Cos[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))) + (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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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) + 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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))*((-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) + ((-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)*Sin[theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Cos[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + 2.5*^-7*Sin[phi]*Sin[theta]*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* (((-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)*Cos[phi]*Cos[theta] - 2*Sin[theta] + 4.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Cos[theta]*Sin[theta]^2 + 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[theta]*Sin[2*theta])*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(-Cos[theta] - 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)*Cos[phi]* (-2*Sin[theta] + Sin[3*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)*Cos[phi]*(-Sin[theta] + Sin[3*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Sin[phi]^2*Sin[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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 5.*^-7*Sin[phi]*Sin[theta]*((-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) + ((-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)*Sin[theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Cos[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + r* ((1.*^-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)*(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) + ((-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)*Sin[theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[ 2*theta]))*(-1.*^-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[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]* (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)*Cos[2*theta] + ((-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) + 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)*(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[theta]* Sin[phi]^2*(Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + (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)*Sin[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]*Cos[2*theta]^ 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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta])) - (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) + (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)/4)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*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)*Cos[theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]*(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)* Cos[2*theta] + ((-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) + 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)* (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[theta]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + (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)*Sin[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]*Cos[2*theta]^ 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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta])) - (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) + (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)/4)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^ 2 - (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) + ((-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)*Sin[theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[ 2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))) - (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) + ((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)/2)*Sin[theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[ 2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))) - (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)*Cos[theta]*(2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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) + (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)*Sin[phi]^2*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) + (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)/4)*Cos[phi]*Sin[2*theta]*(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)*Cos[phi]*Sin[2*theta]) + ((-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)*Cos[phi]* Sin[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[ 2*theta]))/4))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))) - (((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]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))) - (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) + ((-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)*Sin[theta]* (-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) + (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)*Cos[theta]*Sin[phi]^2*Sin[theta] - 5.*^-7*(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) + (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)/4)*Cos[phi]^2*Sin[4*theta]))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))) - (1.*^-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)* (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) + ((-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)*Cos[phi]^2* Sin[theta]*(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)*Cos[2*theta] + ((-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)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))) - (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) + ((-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^ 2)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))) - (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) + ((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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^ 2)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))) - (1.9999999999999998*^-18* (-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) + ((-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^ 2)*Sin[2*theta]*(-3.75*^-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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^3 + 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* Cos[phi]*(-18*(-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)* Cos[theta]*Sin[phi]^2*Sin[theta]^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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^ 3))/4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(-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 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 4.*^-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)*Cos[phi]* (-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))/4 + 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)*(((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2)/ 4 - 12*(-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)*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)* (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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*(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[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (((-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*Cos[theta]^3* Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*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*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.25*^-13*(336/(E^(r^2/4)* r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^ 2 + 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^ 3)) + 1.*^-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*(2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^ 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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[ 4*theta])))^2)) + 5.*^-7*Sin[phi]* ((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)*Cos[phi]*Sin[2*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* Cos[phi]*Sin[theta]^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)^2*Cos[phi]*Sin[theta]^ 4 - 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)* (2.*^-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[phi]*Sin[theta]^4 + Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]*Cos[2*theta]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*((-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[phi]*Cos[2*theta]*(-Cos[2*theta] + 2.*^-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[phi]*Cos[theta]*Sin[theta]^3 + 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)*Cos[phi]* (-Sin[2*theta] + Sin[4*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (2.*^-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)*Cos[theta]*Sin[phi]^2*Sin[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)* 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)*Sin[theta]^2)/2))/(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (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)* ((-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[phi]*Cos[theta]* Sin[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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (9.999999999999999*^-19*(-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]*Sin[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (-(Sin[phi]*Sin[theta]^2*(-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)^2*Cos[phi]*Sin[theta]^ 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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*Sin[theta]*(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)*Cos[theta]*(2 - 6*Cos[2*phi] + 3*Cos[2*(phi - theta)] + 6*Cos[2*theta] + 3*Cos[2*(phi + theta)]) + 16*Cos[phi]*Sin[theta]))/2 - 0.000054* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* (1 + 3*Cos[2*phi])*Sin[2*theta] + 9*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(8*Cos[phi]*(1 + 2*Cos[2*theta]) - 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)*(2 - 6*Cos[2*phi] + 3*Cos[2*(phi - theta)] + 6*Cos[2*theta] + 3*Cos[2*(phi + theta)])*Sin[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)^2*(4*(1 + 2*Cos[2*theta])* Sin[2*phi]*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)*Sin[phi]*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*Sin[phi]* (8*Cos[theta]^3*Sin[phi]^2*Sin[theta] + 4*Cos[2*phi]* Sin[4*theta] + Cos[phi]^2*(-7*Sin[2*theta] + 2*Sin[4*theta] - 3*Sin[6*theta])))))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))^2 - (1.*^-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)*Cos[phi]*Cos[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(1.*^-6*(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)^3*(1 + 3*Cos[2*phi])* Cos[theta]*Sin[theta]^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)^2*Cos[phi]*Sin[theta]^4)/ 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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*(-8*Cos[phi]*Sin[theta]^4 + 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)*(4*(1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^3 - 3*Cos[phi]^2*Sin[2*theta]^3)))/4 + 9*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (-2*Cos[phi]*(1 + 2*Cos[2*theta])*Sin[theta]^2 + 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)*(-4*(1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^3 + 3*Cos[phi]^2*Sin[2*theta]^3))) + 2.5*^-7* (-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*(8*Cos[phi]*(1 + 2*Cos[2*theta])*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)*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 2*Sin[phi]^2*Sin[4*theta] + Cos[phi]^2*(-7*Sin[2*theta] + 6*Sin[4*theta] - 3*Sin[6*theta])))))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*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)*Cos[phi]*Sin[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(1.*^-6* (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)^3* (1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^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)^2*Cos[phi]*Sin[theta]^4)/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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*(-8*Cos[phi]*Sin[theta]^4 + 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)*(4*(1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^3 - 3*Cos[phi]^2*Sin[2*theta]^3)))/4 + 9*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (-2*Cos[phi]*(1 + 2*Cos[2*theta])*Sin[theta]^2 + 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)*(-4*(1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^3 + 3*Cos[phi]^2*Sin[2*theta]^3))) + 2.5*^-7* (-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*(8*Cos[phi]*(1 + 2*Cos[2*theta])*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)*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 2*Sin[phi]^2*Sin[4*theta] + Cos[phi]^2*(-7*Sin[2*theta] + 6*Sin[4*theta] - 3*Sin[6*theta])))))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^2)) - 1.*^-6*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Sin[theta]^2* ((5.*^-7*Sin[phi]*Sin[theta]*(1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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* Cos[phi]*Sin[2*theta]) - 6.*^-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)*(-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^ 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)* Cos[phi]*Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))*((((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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* Cos[phi]*Sin[2*theta] - 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*Cos[phi]^2*Sin[2*theta]^ 2))/2 - 2.5*^-13*(-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* ((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)*Cos[theta]*(4*Cos[theta]*Sin[phi]^2* Sin[theta] + Cos[phi]^2*Sin[4*theta]) + 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)* ((-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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]*Sin[phi]^2* Sin[theta] + Cos[phi]^2*Sin[4*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)* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]) + 1.*^-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]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]))))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))*(4 - 1.*^-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*Sin[phi]^2* Sin[theta]^2 - 2.1599999999999998*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 7.5*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 2.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))) + (3.125*^-14*Csc[theta]*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*(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)* (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) + r*(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) + (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))*Cos[2*theta]* Sin[2*phi] + 2.16*^-10*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]^2*Sin[phi]* (Sin[2*theta] + Sin[4*theta]) - 0.000036* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(-(Cos[2*theta]* Sin[2*phi]) + 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)*Cos[phi]^2*Sin[phi]* (4*Sin[2*theta] + 5*Sin[4*theta]) + 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)*Sin[phi]*(Sin[phi]^2* Sin[2*theta] + Cos[phi]^2*Sin[4*theta])) - 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)^2*(-((Cos[theta]^2 + Cos[2*theta])*Sin[2*phi]) + 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)*Sin[phi]*(2*Sin[phi]^2* Sin[2*theta] + Cos[phi]^2*Sin[4*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)*(8*Cot[theta]*Sin[phi] + 1.*^-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*(2 - 2*Cos[2*phi] + 5*Cos[2*(phi - theta)] - 2*Cos[2*theta] + 5*Cos[2*(phi + theta)])*Cot[theta]* Sin[phi] + 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)* (-4*Cos[2*theta]*Sin[2*phi] + 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)* Sin[phi]*(2*Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]) - 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[phi]* (2*Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[ 4*theta]))))/4 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cot[theta]*Sin[phi] - 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 + 4*Cos[2*theta])*Sin[2*phi] + 1.*^-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] + Cos[3*theta])*Csc[theta]*(Sin[phi] - Sin[3*phi]) + 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[phi]*(2*Sin[2*theta] + 3*Sin[4*theta]) + 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)* (2*Cos[2*theta]*Sin[2*phi] - 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)* Sin[phi]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]) + 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[phi]* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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)*(8.*^-6*Sin[phi]^3*Sin[2*theta] + 6.*^-6*Cos[phi]^ 2*Sin[phi]*Sin[4*theta]))/4))))/(r*(-Csc[theta]^3 + 1.*^-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[phi]^2*Cos[2*theta]^ 2*Csc[theta]^3 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2 + 1.*^-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* Cot[theta]^2*Csc[theta]*Sin[phi]^2 + 4.999999999999999*^-19* (-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*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]* (Cos[phi]^2*Cos[2*theta]^2*Cot[theta]*Csc[theta] + Cos[theta]*(-2 + Cot[theta]^2)*Sin[phi]^2) + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^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*(4*Cos[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^2 - 2.*^-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[phi]*Cos[theta]*(Cos[phi]^2*Cos[theta]^2 + Sin[phi]^2)) + 6.*^-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.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)^2*Cos[phi]*Cos[theta]* (Cos[phi]^2*Cos[theta]^2 + Sin[phi]^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)^2*Cos[phi]*Cos[2*theta]* Cot[theta]*Csc[theta]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^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)*(Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2))/2))*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))) - (1.*^-6*Sin[phi]*Sin[theta]*((1.5*^-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)* ((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)*Cos[phi]*Sin[theta]*Sin[2*theta]* (1 - 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)* Cos[phi]*Sin[2*theta]) + (((-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 + 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)* Cos[phi]*Sin[2*theta] - 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*Cos[phi]^2*Sin[2*theta]^ 2))/2 - 5.*^-13*(-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)*((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)*Cos[theta]*(2*Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta]) - 2.5*^-13*(-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*((-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)*Cos[theta]* (2*Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta]) + 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)*((-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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]* Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*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)* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta])) + 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)*((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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]* Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*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)* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta])) + 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)*((-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.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)*(4*Cos[theta]* Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta]) - 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)*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]) + 1.*^-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]* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta])) + 6.*^-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)* (((-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)*Cos[phi]*Sin[theta]* Sin[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)*Cos[phi]*Sin[2*theta]))/ 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)*Cos[phi]*Sin[theta]* Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta]) + 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)*(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[theta]* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta])))* (4 - 1.*^-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*Sin[phi]^2*Sin[theta]^2 - 2.1599999999999998*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 - 7.5*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 2.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]))) - 1.*^-12*((((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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* Cos[phi]*Sin[2*theta] - 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*Cos[phi]^2*Sin[2*theta]^ 2))/2 - 2.5*^-13*(-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*((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)*Cos[theta]*(2*Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta]) + 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)* ((-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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]* Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*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)* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]) + 1.*^-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]* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta])))* (-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)*(-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[phi]^2* Sin[theta]^2 - 7.5*^-7*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(-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)*Cos[phi]*Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^3 - 0.000648* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^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)*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^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)*(-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)*Cos[phi]^2*Sin[2*theta]^2)/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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]))/4 - (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)* (-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]))/4 + 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* (-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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3) + 72*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^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)* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^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)^2*Cos[phi]* (((-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)*(4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*theta]))/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)*(2*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*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)*(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*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))))/(-4 + 1.*^-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*Sin[phi]^2* Sin[theta]^2 + 2.1599999999999998*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 7.5*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) - 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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 2.*^-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))^2 - (2.5*^-13*Sin[phi]*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*Cos[theta]^2*Sin[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)*(2*Cos[phi]^2* Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2*Sin[theta]^2)/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)^2*Cos[theta]* (-1.*^-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]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* ((-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*(-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 + 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)*Cos[phi]*Sin[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)*Cos[theta]* (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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/(r*(1 - 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))) + (2.5*^-13*Sin[phi]*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*Cos[theta]^2*Sin[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)*(2*Cos[phi]^2* Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2*Sin[theta]^2)/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)^2*Cos[theta]* (-1.*^-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]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* ((-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*(-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 + 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)*Cos[phi]*Sin[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)*Cos[theta]* (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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*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)*((-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[phi]*Cos[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/(r*(1 - 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))) + (2.5*^-7*Sin[phi]*Sin[theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Sin[phi]^2* Sin[2*theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + 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)* (-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)*Cos[phi]*Cos[theta] - 2*Sin[theta] + 4.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Cos[theta]*Sin[theta]^2 + 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[theta]*Sin[2*theta])*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]*Cos[2*theta]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])) + 2*(1.*^-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[phi]^ 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)* Cos[phi]*Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(-Cos[theta] - 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)*Cos[phi]* (-2*Sin[theta] + Sin[3*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)*Cos[phi]*(-Sin[theta] + Sin[3*theta])))*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*Cot[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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*Cos[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))) - (2.5*^-13*Sin[phi]*Sin[theta]*( 4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta])*(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*Cos[phi]*Cos[theta]* Sin[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)* (1 - 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)*Cos[phi]*Cos[theta]* Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))*((-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) + ((-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)*Sin[theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*Cos[theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - (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) + ((-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)*Cos[phi]* Sin[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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/(r*(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))) + (2.5*^-7*(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)* (-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))*Sin[phi]*Sin[2*theta]*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]))) + (-6.*^-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)* Cos[phi]*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)*Cos[phi]*Sin[2*theta]))* (-4*Cos[2*theta]*Sin[phi] + 8.*^-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[phi]*Cos[theta]* Sin[phi]*Sin[theta]^3 + 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)*Sin[2*phi]*(-Sin[2*theta] + Sin[4*theta]))*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]))) - 5.*^-13*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)* Cos[phi]*Sin[2*theta]))*(0.000054*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[theta]*(Sin[phi] - 3*Sin[3*phi])*Sin[theta]^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)^2*Cos[phi]*Sin[phi]* Sin[theta]^4 - 72*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* Sin[phi]*Sin[theta]^2*(-(Cos[phi]*(1 + 2*Cos[2*theta])) + 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)*(Cos[phi]^2*(Cos[theta] + 3*Cos[3*theta]) + 4*Cos[theta]*Sin[phi]^2)*Sin[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)* (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)^2*Cos[theta]*(2 - 6*Cos[2*phi] + 3*Cos[ 2*(phi - theta)] + 6*Cos[2*theta] + 3*Cos[ 2*(phi + theta)])*Sin[phi]*Sin[theta]^3 + 4*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*Sin[2*phi]*Sin[theta]^4 - 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)^2*Sin[phi]*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*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)^ 2*(-4*(1 + 2*Cos[2*theta])*Sin[2*phi]*Sin[theta]^2 + 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)*Sin[phi]*(-8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Sin[phi]^2*Sin[4*theta] + Cos[phi]^2* (7*Sin[2*theta] - 6*Sin[4*theta] + 3*Sin[ 6*theta]))))))/(r*(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))^2))))/ (Sqrt[2]*r) + (-1.*^-6*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Sin[theta]^2* ((2.5*^-7*(4*Cos[phi]*Cos[2*theta] + 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)* (2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*((1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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]*Sin[phi]^2* Sin[2*theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (Csc[theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))*(Cos[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)*Cos[phi]*Sin[3*theta] + 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)*Cos[phi]*Sin[3*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*Sin[phi]^2* (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)*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 - 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*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) + (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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + (2.5*^-7*((-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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta] - 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (3.*^-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)*(-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r - (5.*^-13*Sin[phi]^2*Sin[theta]* ((((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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*Cos[phi]*Sin[2*theta] - 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* Cos[phi]^2*Sin[2*theta]^2))/2 - 2.5*^-13* (-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* ((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)*Cos[theta]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta]) + 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)*((-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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*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)*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]) + 1.*^-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]* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta])))* (-((Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(4 - 1.*^-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*Sin[phi]^2*Sin[theta]^2 - 2.1599999999999998*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 7.5*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 2.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + (2.5*^-13*Sin[phi]^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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta]))* (-Cos[theta] - 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)*Cos[phi]* (-2*Sin[theta] + Sin[3*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)*Cos[phi]*(-Sin[theta] + Sin[3*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*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)*Cos[phi]*Cos[theta] + Sin[theta]*(1 - 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)* Cos[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]*Cos[theta]* Sin[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)*Cos[phi]*Sin[2*theta] + 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)*Cos[phi]*Sin[2*theta])))/(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r - (2.5*^-7*((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)* ((-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta] - 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (3.*^-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)*(-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r - (2.5*^-13*Sin[phi]^2*Sin[theta]*((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 - 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) + 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))*Cos[phi]*Cos[2*theta]*Csc[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 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) - 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))*Csc[theta]^2* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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) + ((-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)*Sin[theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Cos[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r - 5.*^-7*((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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta]))* (-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]*(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)* Cos[2*theta] + ((-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) + 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)*(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[theta]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + (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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]* Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]*Cos[2*theta]^ 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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)* Sin[2*theta]*(-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)*Cos[phi]* Sin[2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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) + ((-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)*Cos[phi]*Sin[2*theta]* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))* (-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]*(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)* Cos[2*theta] + ((-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) + 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)*(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[theta]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + (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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]* Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]*Cos[2*theta]^ 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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)* Sin[2*theta]*(-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)*Cos[phi]* Sin[2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2 - (1.*^-6* (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) + ((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)/2)*Sin[phi]^2* Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)*(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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]*(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)*Cos[phi]*Sin[2*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)*Sin[theta]* (1 + 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)* Cos[phi]*Cos[theta]*Sin[theta] - 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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Cos[phi]^2*Sin[2*theta]* (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)*(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[phi]*Cos[2*theta]^ 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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)* Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((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)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (1.*^-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)*Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]* (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)*Cos[2*theta] + ((-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))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (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)*((-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[phi]^2* Sin[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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (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)* ((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]*Sin[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (1.9999999999999998*^-18*(-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]*Sin[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (-3.75*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^3 + 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* Cos[phi]*(-18*(-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)*Cos[theta]*Sin[phi]^2* Sin[theta]^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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(-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 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 4.*^-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)*Cos[phi]* (-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))/4 + 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)*(((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2)/4 - 12*(-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)*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)* (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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*(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[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (((-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*Cos[theta]^3* Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*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*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))^2) + (5.*^-7*(Cos[phi]*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)* Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 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)* Cos[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))) + 1.*^-6*Sin[phi]* ((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)* ((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*Cos[2*theta]*Sin[phi]*Sin[2*theta])/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 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)*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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]*Sin[phi]*(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)* Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*Cot[theta]*Sin[phi]*Sin[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)* Cos[phi]*Sin[2*theta]))/(4*(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 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)*((-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)*Cot[theta]*Sin[phi]*Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 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)* Cos[phi]*Sin[phi]*(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)*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)*Sin[theta]^2)/2)*Sin[2*theta])/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*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)*(-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[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))) - (3.*^-12*((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)* Cos[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta]* (-(Sin[phi]*Sin[theta]^2*(-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)^2*Cos[phi]*Sin[theta]^ 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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*Sin[theta]*(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)*Cos[theta]*(2 - 6*Cos[2*phi] + 3*Cos[2*(phi - theta)] + 6*Cos[2*theta] + 3*Cos[2*(phi + theta)]) + 16*Cos[phi]*Sin[theta]))/2 - 0.000054* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* (1 + 3*Cos[2*phi])*Sin[2*theta] + 9*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(8*Cos[phi]*(1 + 2*Cos[2*theta]) - 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)*(2 - 6*Cos[2*phi] + 3*Cos[2*(phi - theta)] + 6*Cos[2*theta] + 3*Cos[2*(phi + theta)])*Sin[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)^2*(4*(1 + 2*Cos[2*theta])* Sin[2*phi]*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)*Sin[phi]*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*Sin[phi]*(8*Cos[theta]^3*Sin[phi]^2*Sin[theta] + 4*Cos[2*phi]*Sin[4*theta] + Cos[phi]^2* (-7*Sin[2*theta] + 2*Sin[4*theta] - 3*Sin[ 6*theta])))))/(-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^ 2 + 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^ 3)) + 1.*^-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*(2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^ 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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[ 4*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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*Cos[2*theta]*Sin[phi]*(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)* Cos[phi]*Sin[2*theta])*(1.*^-6*(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)^3* (1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^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)^2*Cos[phi]*Sin[theta]^4)/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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(-8*Cos[phi]*Sin[theta]^ 4 + 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)*(4*(1 + 3*Cos[2*phi])* Cos[theta]*Sin[theta]^3 - 3*Cos[phi]^2*Sin[2*theta]^ 3)))/4 + 9*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (-2*Cos[phi]*(1 + 2*Cos[2*theta])*Sin[theta]^2 + 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)*(-4*(1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^3 + 3*Cos[phi]^2*Sin[2*theta]^3))) + 2.5*^-7* (-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*(8*Cos[phi]*(1 + 2*Cos[2*theta])*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)*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 2*Sin[phi]^2*Sin[4*theta] + Cos[phi]^2* (-7*Sin[2*theta] + 6*Sin[4*theta] - 3*Sin[ 6*theta])))))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*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)*Cot[theta]*Sin[phi]* (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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])*(1.*^-6*(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)^3*(1 + 3*Cos[2*phi])* Cos[theta]*Sin[theta]^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)^2*Cos[phi]*Sin[theta]^4)/ 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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*(-8*Cos[phi]*Sin[theta]^4 + 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)*(4*(1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^3 - 3*Cos[phi]^2*Sin[2*theta]^3)))/4 + 9*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (-2*Cos[phi]*(1 + 2*Cos[2*theta])*Sin[theta]^2 + 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)*(-4*(1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^3 + 3*Cos[phi]^2*Sin[2*theta]^3))) + 2.5*^-7* (-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*(8*Cos[phi]*(1 + 2*Cos[2*theta])*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)*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 2*Sin[phi]^2*Sin[4*theta] + Cos[phi]^2* (-7*Sin[2*theta] + 6*Sin[4*theta] - 3*Sin[ 6*theta])))))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^ 2)))/r) + 1.*^-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[phi]*Cos[2*theta]* ((-1.*^-6*Sin[phi]*Sin[theta]*((((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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* Cos[phi]*Sin[2*theta] - 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*Cos[phi]^2*Sin[2*theta]^ 2))/2 - 2.5*^-13*(-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* ((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)*Cos[theta]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta]) + 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)*((-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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*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)*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]) + 1.*^-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]* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta])))* ((-5.*^-7*(-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 + 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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* 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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))))/(4 - 1.*^-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*Sin[phi]^2*Sin[theta]^ 2 - 2.1599999999999998*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 7.5*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 2.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) + (1.25*^-13*Sin[phi]*(4*Cos[phi]*Cos[2*theta] + 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)* (2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*((2.5*^-7*(-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*Sin[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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)* 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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*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) - (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)*Sin[theta]^2)* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (Cos[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)*Cos[phi]*Sin[3*theta] + 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)*Cos[phi]*Sin[3*theta]))/(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) - 2.5*^-13*Sin[phi]*((-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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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)* (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[theta]^2*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Sin[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]*Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + 2.5*^-13*Sin[phi]*((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)*((-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[phi]*Cos[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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)* (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[theta]^2*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Sin[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]*Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 2.5*^-13*r*Sin[phi]*Sin[theta]*((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)*(-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) + 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))*Cos[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))) + (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)*Cos[phi]*Sin[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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) + 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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))* ((-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) + ((-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)*Sin[theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Cos[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + 2.5*^-7*Sin[phi]*Sin[theta]*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* (((-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)*Cos[phi]*Cos[theta] - 2*Sin[theta] + 4.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Cos[theta]* Sin[theta]^2 + 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[theta]*Sin[2*theta])*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(-Cos[theta] - 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)*Cos[phi]* (-2*Sin[theta] + Sin[3*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)*Cos[phi]*(-Sin[theta] + Sin[3*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Sin[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 5.*^-7*Sin[phi]*Sin[theta]*((-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) + ((-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)*Sin[theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Cos[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + r*((1.*^-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)*(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) + ((-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)*Sin[theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]* (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)*Cos[2*theta] + ((-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) + 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)*(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[theta]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 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) + (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)*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]*Sin[ 2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]* Cos[2*theta]^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)*Sin[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)*Cos[phi]*Sin[2*theta]))/ 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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*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)*Cos[theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]*(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)* Cos[2*theta] + ((-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) + 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)* (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[theta]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + (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)*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]*Sin[ 2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]* Cos[2*theta]^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)*Sin[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)*Cos[phi]*Sin[2*theta]))/ 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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^ 2 - (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) + ((-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)*Sin[theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - (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) + ((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)/2)*Sin[theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - (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)*Cos[theta]* (2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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) + (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)*Sin[phi]^2* 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) + (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)/4)*Cos[phi]* Sin[2*theta]*(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)*Cos[phi]* Sin[2*theta]) + ((-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)*Cos[phi]* Sin[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[ 2*theta]))/4))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - (((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]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - (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) + ((-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)*Sin[theta]* (-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) + (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)*Cos[theta]* Sin[phi]^2*Sin[theta] - 5.*^-7*(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) + (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)/4)*Cos[phi]^2* Sin[4*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - (1.*^-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)*(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) + ((-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)*Cos[phi]^2* Sin[theta]*(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)*Cos[2*theta] + ((-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)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))) - (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) + ((-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)*Cos[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))) - (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) + ((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)*Cos[phi]* Sin[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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))) - (1.9999999999999998*^-18* (-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) + ((-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)*Cos[phi]* Sin[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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta]* (-3.75*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]* Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^3 + 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* Cos[phi]*(-18*(-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)*Cos[theta]*Sin[phi]^2* Sin[theta]^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)*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(-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 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 4.*^-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)*Cos[phi]* (-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))/4 + 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)*(((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2)/ 4 - 12*(-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)*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)* (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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*(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[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (((-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*Cos[theta]^3* Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*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*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))^2)) + 5.*^-7*Sin[phi]* ((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)*Cos[phi]*Sin[2*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* Cos[phi]*Sin[theta]^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)^2*Cos[phi]*Sin[theta]^ 4 - 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)* (2.*^-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[phi]*Sin[theta]^4 + Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*((-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[phi]*Cos[2*theta]*(-Cos[2*theta] + 2.*^-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[phi]*Cos[theta]*Sin[theta]^3 + 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)*Cos[phi]* (-Sin[2*theta] + Sin[4*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (2.*^-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)*Cos[theta]*Sin[phi]^2*Sin[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)* 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)*Sin[theta]^2)/2))/(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (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)* ((-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[phi]*Cos[theta]* Sin[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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (9.999999999999999*^-19*(-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]*Sin[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (-(Sin[phi]*Sin[theta]^2*(-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)^2*Cos[phi]* Sin[theta]^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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]* (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)*Cos[theta]*(2 - 6*Cos[2*phi] + 3*Cos[2*(phi - theta)] + 6*Cos[2*theta] + 3*Cos[2*(phi + theta)]) + 16*Cos[phi]*Sin[theta]))/2 - 0.000054* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* (1 + 3*Cos[2*phi])*Sin[2*theta] + 9*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(8*Cos[phi]*(1 + 2*Cos[2*theta]) - 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)*(2 - 6*Cos[2*phi] + 3*Cos[2*(phi - theta)] + 6*Cos[2*theta] + 3*Cos[2*(phi + theta)])*Sin[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)^2*(4*(1 + 2*Cos[2*theta])* Sin[2*phi]*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)*Sin[phi]*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*Sin[phi]*(8*Cos[theta]^3* Sin[phi]^2*Sin[theta] + 4*Cos[2*phi]*Sin[4*theta] + Cos[phi]^2*(-7*Sin[2*theta] + 2*Sin[4*theta] - 3*Sin[6*theta])))))/(-2 + 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))^2 - (1.*^-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)*Cos[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(1.*^-6*(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)^3*(1 + 3*Cos[2*phi])* Cos[theta]*Sin[theta]^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)^2*Cos[phi]* Sin[theta]^4)/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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)*(-8*Cos[phi]* Sin[theta]^4 + 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)*(4*(1 + 3*Cos[2*phi])* Cos[theta]*Sin[theta]^3 - 3*Cos[phi]^2*Sin[2*theta]^ 3)))/4 + 9*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (-2*Cos[phi]*(1 + 2*Cos[2*theta])*Sin[theta]^2 + 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)*(-4*(1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^3 + 3*Cos[phi]^2*Sin[2*theta]^3))) + 2.5*^-7* (-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*(8*Cos[phi]* (1 + 2*Cos[2*theta])*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)* (Cos[phi]^2*(6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 2*Sin[phi]^2* Sin[4*theta] + Cos[phi]^2*(-7*Sin[2*theta] + 6*Sin[4*theta] - 3*Sin[6*theta])))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* 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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))* (1.*^-6*(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)^3* (1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^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)^2*Cos[phi]*Sin[theta]^4)/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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*(-8*Cos[phi]*Sin[theta]^4 + 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)*(4*(1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^3 - 3*Cos[phi]^2*Sin[2*theta]^3)))/4 + 9*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (-2*Cos[phi]*(1 + 2*Cos[2*theta])*Sin[theta]^2 + 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)*(-4*(1 + 3*Cos[2*phi])*Cos[theta]*Sin[theta]^3 + 3*Cos[phi]^2*Sin[2*theta]^3))) + 2.5*^-7* (-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*(8*Cos[phi]* (1 + 2*Cos[2*theta])*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)* (Cos[phi]^2*(6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 2*Sin[phi]^2* Sin[4*theta] + Cos[phi]^2*(-7*Sin[2*theta] + 6*Sin[4*theta] - 3*Sin[6*theta])))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2)) + r^2*(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)*Cos[phi]*Sin[2*theta])* ((5.*^-7*Sin[phi]*Sin[theta]*(1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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* Cos[phi]*Sin[2*theta]) - 6.*^-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)*(-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))* ((((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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*Cos[phi]*Sin[2*theta] - 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* Cos[phi]^2*Sin[2*theta]^2))/2 - 2.5*^-13* (-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* ((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)*Cos[theta]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta]) + 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)*((-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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*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)*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]) + 1.*^-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]* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta]))))/ (r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])))* (4 - 1.*^-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*Sin[phi]^2*Sin[theta]^2 - 2.1599999999999998*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 7.5*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 2.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + (3.125*^-14*Csc[theta]*(4*Cos[phi]* Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*(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)*(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) + r*(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) + (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))*Cos[2*theta]*Sin[2*phi] + 2.16*^-10* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]^2*Sin[phi]* (Sin[2*theta] + Sin[4*theta]) - 0.000036* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(-(Cos[2*theta]* Sin[2*phi]) + 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)*Cos[phi]^2*Sin[phi]* (4*Sin[2*theta] + 5*Sin[4*theta]) + 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)*Sin[phi]*(Sin[phi]^2* Sin[2*theta] + Cos[phi]^2*Sin[4*theta])) - 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)^2*(-((Cos[theta]^2 + Cos[2*theta])*Sin[2*phi]) + 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)*Sin[phi]*(2*Sin[phi]^2* Sin[2*theta] + Cos[phi]^2*Sin[4*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)*(8*Cot[theta]*Sin[phi] + 1.*^-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*(2 - 2*Cos[2*phi] + 5*Cos[2*(phi - theta)] - 2*Cos[2*theta] + 5*Cos[2*(phi + theta)])*Cot[theta]* Sin[phi] + 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)* (-4*Cos[2*theta]*Sin[2*phi] + 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)* Sin[phi]*(2*Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]) - 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[phi]* (2*Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta]))))/ 4 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*Cot[theta]*Sin[phi] - 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 + 4*Cos[2*theta])* Sin[2*phi] + 1.*^-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] + Cos[3*theta])*Csc[theta]*(Sin[phi] - Sin[3*phi]) + 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[phi]* (2*Sin[2*theta] + 3*Sin[4*theta]) + 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)*(2*Cos[2*theta]* Sin[2*phi] - 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)* Sin[phi]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]) + 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[phi]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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)*(8.*^-6*Sin[phi]^3* Sin[2*theta] + 6.*^-6*Cos[phi]^2*Sin[phi]*Sin[ 4*theta]))/4))))/(r*(-Csc[theta]^3 + 1.*^-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[phi]^2* Cos[2*theta]^2*Csc[theta]^3 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2 + 1.*^-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*Cot[theta]^2* Csc[theta]*Sin[phi]^2 + 4.999999999999999*^-19* (-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* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*(Cos[phi]^2*Cos[2*theta]^2*Cot[theta]*Csc[theta] + Cos[theta]*(-2 + Cot[theta]^2)*Sin[phi]^2) + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^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*(4*Cos[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^2 - 2.*^-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[phi]*Cos[theta]*(Cos[phi]^2*Cos[theta]^2 + Sin[phi]^2)) + 6.*^-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.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)^2*Cos[phi]*Cos[theta]* (Cos[phi]^2*Cos[theta]^2 + Sin[phi]^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)^2*Cos[phi]*Cos[2*theta]* Cot[theta]*Csc[theta]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^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)*(Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2))/2))*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - (1.*^-6*Sin[phi]*Sin[theta]* ((1.5*^-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)*((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)*Cos[phi]* Sin[theta]*Sin[2*theta]*(1 - 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)*Cos[phi]*Sin[2*theta]) + (((-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 + 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)* Cos[phi]*Sin[2*theta] - 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*Cos[phi]^2*Sin[2*theta]^ 2))/2 - 5.*^-13*(-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)*((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)*Cos[theta]*(2*Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta]) - 2.5*^-13*(-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* ((-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)*Cos[theta]* (2*Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta]) + 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)*((-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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]*Sin[phi]^2* Sin[theta] + Cos[phi]^2*Sin[4*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)* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta])) + 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)*((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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]*Sin[phi]^2* Sin[theta] + Cos[phi]^2*Sin[4*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)* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta])) + 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)*((-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.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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta]) - 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)* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]) + 1.*^-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]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta])) + 6.*^-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)*(((-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)*Cos[phi]*Sin[theta]* Sin[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)*Cos[phi]*Sin[2*theta]))/ 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)*Cos[phi]*Sin[theta]* Sin[2*theta]*(-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)*Cos[phi]* Sin[2*theta]) + 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)* (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[theta]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta])))*(4 - 1.*^-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*Sin[phi]^2*Sin[theta]^ 2 - 2.1599999999999998*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 7.5*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 2.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) - 1.*^-12* ((((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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*Cos[phi]*Sin[2*theta] - 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* Cos[phi]^2*Sin[2*theta]^2))/2 - 2.5*^-13* (-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*((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)*Cos[theta]* (2*Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta]) + 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)*((-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*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*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)*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]) + 1.*^-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]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta])))*(-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)*(-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[phi]^2*Sin[theta]^2 - 7.5*^-7* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(-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)*Cos[phi]* Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^3 - 0.000648*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^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)*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^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)*(-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)*Cos[phi]^2*Sin[2*theta]^2)/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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]))/4 - (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)* (-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]))/4 + 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* (-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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3) + 72*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^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)* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^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)^2*Cos[phi]* (((-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)*(4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*theta]))/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)*(2*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*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)*(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*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))))/ (-4 + 1.*^-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*Sin[phi]^2*Sin[theta]^2 + 2.1599999999999998*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 7.5*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) - 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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 2.*^-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))^ 2 - (2.5*^-13*Sin[phi]*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*Cos[theta]^2*Sin[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)*(2*Cos[phi]^2* Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2*Sin[theta]^2)/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)^2*Cos[theta]* (-1.*^-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]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* ((-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*(-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 + 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)*Cos[phi]*Sin[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)*Cos[theta]* (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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(1 - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + (2.5*^-13*Sin[phi]*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* Cos[theta]^2*Sin[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)* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2* Sin[theta]^2)/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)^2*Cos[theta]* (-1.*^-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]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* ((-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*(-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 + 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)*Cos[phi]*Sin[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)*Cos[theta]* (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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*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)* ((-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(1 - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + (2.5*^-7*Sin[phi]*Sin[theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Sin[phi]^2*Sin[2*theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + 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)* (-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)*Cos[phi]*Cos[theta] - 2*Sin[theta] + 4.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Cos[theta]* Sin[theta]^2 + 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[theta]*Sin[2*theta])*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])) + 2* (1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(-Cos[theta] - 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)*Cos[phi]*(-2*Sin[theta] + Sin[3*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)*Cos[phi]* (-Sin[theta] + Sin[3*theta])))*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta])))) - (2.5*^-13*Sin[phi]*Sin[theta]* (4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])* (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* Cos[phi]*Cos[theta]*Sin[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)*(1 - 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)*Cos[phi]*Cos[theta]* Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))*((-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) + ((-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)*Sin[theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Cos[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + (2.5*^-7*(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)* (-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))*Sin[phi]*Sin[2*theta]*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) + (-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*(-4*Cos[2*theta]*Sin[phi] + 8.*^-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[phi]*Cos[theta]*Sin[phi]*Sin[theta]^3 + 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)*Sin[2*phi]* (-Sin[2*theta] + Sin[4*theta]))*(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) - 5.*^-13* (4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*(0.000054*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[theta]*(Sin[phi] - 3*Sin[3*phi])*Sin[theta]^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)^2*Cos[phi]*Sin[phi]* Sin[theta]^4 - 72*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* Sin[phi]*Sin[theta]^2*(-(Cos[phi]*(1 + 2*Cos[2*theta])) + 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)*(Cos[phi]^2*(Cos[theta] + 3*Cos[3*theta]) + 4*Cos[theta]*Sin[phi]^2)*Sin[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)* (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)^2*Cos[theta]*(2 - 6*Cos[2*phi] + 3*Cos[2*(phi - theta)] + 6*Cos[2*theta] + 3*Cos[2*(phi + theta)])*Sin[phi]*Sin[theta]^3 + 4*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*Sin[2*phi]*Sin[theta]^4 - 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)^2*Sin[phi]*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*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)^2* (-4*(1 + 2*Cos[2*theta])*Sin[2*phi]*Sin[theta]^2 + 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)*Sin[phi]*(-8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Sin[phi]^2*Sin[4*theta] + Cos[phi]^2*(7*Sin[2*theta] - 6*Sin[4*theta] + 3*Sin[6*theta]))))))/ (r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))^2)))/ (Sqrt[2]*r))/2 + ((I*Csc[theta]*(r^2*Sin[theta]^2*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])*((5.*^-7*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*( 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* Cos[phi]*Cos[theta]*Sin[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)*(1 - 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)*Cos[phi]*Cos[theta]* Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))*((1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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]*Sin[phi]^2*Sin[2*theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (Csc[theta]* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))*(Cos[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)*Cos[phi]*Sin[3*theta] + 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)*Cos[phi]*Sin[3*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (1.*^-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)*Sin[phi]^2* (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)*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 - 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*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) + (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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/(r^2*(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))) + 1.5*^-12*((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[phi]*Cos[theta]* Sin[theta]*((-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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + (2.5*^-13*Sin[phi]^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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Sin[2*theta]* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta]))*(-Cos[theta] - 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)*Cos[phi]*(-2*Sin[theta] + Sin[3*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)*Cos[phi]* (-Sin[theta] + Sin[3*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*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)*Cos[phi]*Cos[theta] + Sin[theta]*(1 - 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)* Cos[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]*Cos[theta]* Sin[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)*Cos[phi]*Sin[2*theta] + 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)*Cos[phi]*Sin[2*theta])))/(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))))*((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 - 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) + 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))*Cos[phi]*Cos[2*theta]*Csc[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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 + 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) - 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))*Csc[theta]^2*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (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)*(-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[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/r^2 + 2.5*^-13* ((-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[phi]^2* Sin[theta]*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - ((1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (3.*^-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)* (-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))))^2/(4*r^2) - (2.5*^-13*Sin[phi]^2*( (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 - 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) + 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))*Cos[phi]*Cos[2*theta]* Csc[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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 + 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) - 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))*Csc[theta]^2*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (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)*(-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[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))))*((-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)* (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[theta]^2* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)* Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/r^2 - (2.5*^-13*Sin[phi]^2*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* Cos[theta]^2*Sin[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)* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2* Sin[theta]^2)/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)^2* Cos[theta]*(-1.*^-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]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* ((-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*(-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 + 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)*Cos[phi]*Sin[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)*Cos[theta]* (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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*theta])/2))))*( -((Csc[theta]*(-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)*Cos[phi]* Sin[2*theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)* (-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/(r^2*(1 - 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))) - (2.5*^-7*((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)*(-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) + 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))*Cos[phi]*Cos[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta])))) + (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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (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)*(-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) + 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[phi]^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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))*((1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (3.*^-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)* (-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/r - ((1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta] - 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (3.*^-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)*(-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - 1.*^-6*r*((-1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]* (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)*Cos[2*theta] + ((-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) + 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)*(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[theta]* Sin[phi]^2*(Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + (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)*Sin[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]*Cos[2*theta]^ 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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta])) - (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) + (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)/4)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^ 2 + ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta] - 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]*(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)* Cos[2*theta] + ((-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) + 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)* (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[theta]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + (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)*Sin[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]*Cos[2*theta]^ 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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta])) - (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) + (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)/4)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^ 2 + (1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2*Sin[theta]*(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)*(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[phi]* (Cos[theta] + Cos[3*theta]) + 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)* Sin[theta]*(-1 + 1.*^-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[phi]*Cos[theta]* Sin[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)*Cos[phi]*Sin[2*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*theta]))/2))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))) + (1.*^-6*(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*(-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 + 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) + (-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))*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))) - (Cos[phi]*(2 - 2.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]* Cos[2*theta]^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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)* Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))) + ((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*(-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))/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) + (-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))*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))) + (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)* (-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[phi]^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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*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)*(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[phi]^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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))) + (6.*^-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)*(-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[phi]*Sin[phi]^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)* Cos[2*theta] + ((-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)* Sin[2*theta])/(-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))) - (5.999999999999999*^-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)* (-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[phi]^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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta]* (3.75*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]* Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^3 - 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* Cos[phi]*(-18*(-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)* Cos[theta]*Sin[phi]^2*Sin[theta]^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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^ 3))/4) + 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/4*((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2) + 12* (-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)*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2) - 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)* (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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*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)*(-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 + 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)*(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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*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)* (4*(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[phi]^2*Cos[2*theta]^2 + Cos[theta]^2* Sin[phi]^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*(-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*Cos[phi]^3*Cos[2*theta]^ 2*Sin[2*theta] + Cos[phi]*Sin[phi]^2*Sin[ 4*theta]) + ((-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)*(-4*Cos[phi]*Cos[theta]^3*Sin[phi]^2* Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2*Sin[ 2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))/4))))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 3.75*^-13*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^ 2 + 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^ 3)) + 1.*^-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*(2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^ 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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[ 4*theta])))^2))/(2*r^2) + (5.*^-7*(Cos[phi]*((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 - 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) + 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))*Cos[phi]*Cos[2*theta]*Csc[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 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 + 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) - 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))*Csc[theta]^2*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))) + (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)* (-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[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]* Sin[2*phi]*Sin[4*theta])))) + Sin[phi]* ((-1.9999999999999998*^-18*(-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) + 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))*Cos[phi]*Cos[2*theta]*Csc[theta]^3*Sin[phi]* (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)^3* (1 + 3*Cos[2*phi])*Cos[theta] + 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*(Cos[phi]*(-4*Cos[theta]* Cot[theta] + Csc[theta]) + 1.*^-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]*(Cos[phi]^2*(-2 + 3*Cos[theta]^2) + Sin[phi]^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*Csc[theta]*(4*Cos[phi]*(1 + 2*Cos[2*theta]) - 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)*Csc[theta]*(Cos[phi]^2*(4*Cos[theta] - 3*Cos[3*theta] + 3*Cos[5*theta]) + (Cos[theta] + 3*Cos[3*theta])*Sin[phi]^2)))/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)^2*Cos[phi]*Sin[theta])/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)*(-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)^2*Cos[theta]*(Cos[phi]^2*(-2 + 3*Cos[theta]^2) + Sin[phi]^2) + 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)^2*Cos[2*theta]* Cot[theta]*Csc[theta]*(Cos[phi]^2*(-2 + 3*Cos[ 2*theta]) + Sin[phi]^2) - 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)*Cos[phi]*Sin[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 + 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)^ 2*Cos[phi]*Cos[2*theta]*Cot[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* Cos[phi]*Cos[theta]*Sin[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta])))/ (-Csc[theta]^3 + 1.*^-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[phi]^2*Cos[2*theta]^2*Csc[theta]^3 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2 + 1.*^-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*Cot[theta]^2*Csc[theta]*Sin[phi]^2 + 4.999999999999999*^-19*(-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*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*(Cos[phi]^2*Cos[2*theta]^2*Cot[theta]* Csc[theta] + Cos[theta]*(-2 + Cot[theta]^2)*Sin[phi]^ 2) + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^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* (4*Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2 - 2.*^-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[phi]*Cos[theta]* (Cos[phi]^2*Cos[theta]^2 + Sin[phi]^2)) + 6.*^-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.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)^2*Cos[phi]*Cos[theta]*(Cos[phi]^2*Cos[theta]^2 + Sin[phi]^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)^2*Cos[phi]* Cos[2*theta]*Cot[theta]*Csc[theta]*(Cos[phi]^2* Cos[2*theta] + Sin[phi]^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)*(Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2))/2))^2 + (1.*^-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 - 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) + 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))*Csc[theta]^5*Sin[phi]*(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)^3* (1 + 3*Cos[2*phi])*Cos[theta] + 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*(Cos[phi]*(-4*Cos[theta]* Cot[theta] + Csc[theta]) + 1.*^-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]*(Cos[phi]^2*(-2 + 3*Cos[theta]^2) + Sin[phi]^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*Csc[theta]*(4*Cos[phi]*(1 + 2*Cos[2*theta]) - 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)*Csc[theta]*(Cos[phi]^2*(4*Cos[theta] - 3*Cos[3*theta] + 3*Cos[5*theta]) + (Cos[theta] + 3*Cos[3*theta])*Sin[phi]^2)))/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)^2*Cos[phi]*Sin[theta])/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)*(-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)^2*Cos[theta]*(Cos[phi]^2*(-2 + 3*Cos[theta]^2) + Sin[phi]^2) + 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)^2*Cos[2*theta]* Cot[theta]*Csc[theta]*(Cos[phi]^2*(-2 + 3*Cos[ 2*theta]) + Sin[phi]^2) - 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)*Cos[phi]*Sin[theta]))* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])))/(-Csc[theta]^3 + 1.*^-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[phi]^2*Cos[2*theta]^ 2*Csc[theta]^3 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2 + 1.*^-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*Cot[theta]^2*Csc[theta]* Sin[phi]^2 + 4.999999999999999*^-19*(-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*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*(Cos[phi]^2*Cos[2*theta]^2*Cot[theta]* Csc[theta] + Cos[theta]*(-2 + Cot[theta]^2)*Sin[phi]^ 2) + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^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* (4*Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2 - 2.*^-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[phi]*Cos[theta]* (Cos[phi]^2*Cos[theta]^2 + Sin[phi]^2)) + 6.*^-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.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)^2*Cos[phi]*Cos[theta]*(Cos[phi]^2*Cos[theta]^2 + Sin[phi]^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)^2*Cos[phi]* Cos[2*theta]*Cot[theta]*Csc[theta]*(Cos[phi]^2* Cos[2*theta] + Sin[phi]^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)*(Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2))/2))^2 + (2.*^-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 - 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) + 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))*Cos[phi]*Cos[2*theta]*Csc[theta]*Sin[phi]* (-((-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]*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)*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[theta]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))) - (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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 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))*Csc[theta]^2*Sin[phi]*Sin[2*theta]* (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)^2*Cos[phi]*Cos[2*theta]^ 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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*(336/(E^(r^2/4)*r^4) - (21* (16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*Cos[theta]* Sin[theta]))*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))) - (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 - 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) + 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))*Cos[2*theta]*Csc[theta]*Sin[phi]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))) - (3.*^-12*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)*Cos[phi]*Sin[phi]* (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)* 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)*Sin[theta]^2)/2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]* Sin[2*phi]*Sin[4*theta]))) - (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)*(-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[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]* Sin[2*phi]*Sin[4*theta]))) - (2.9999999999999994*^-18*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)*Cos[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta]* (-(Sin[phi]*Sin[theta]^2*(-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)^2*Cos[phi]*Sin[theta]^ 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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*Sin[theta]*(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)*Cos[theta]*(2 - 6*Cos[2*phi] + 3*Cos[2*(phi - theta)] + 6*Cos[ 2*theta] + 3*Cos[2*(phi + theta)]) + 16*Cos[phi]* Sin[theta]))/2 - 0.000054*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*(1 + 3*Cos[2*phi])* Sin[2*theta] + 9*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(8*Cos[phi]*(1 + 2*Cos[2*theta]) - 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)*(2 - 6*Cos[2*phi] + 3*Cos[2*(phi - theta)] + 6*Cos[2*theta] + 3*Cos[2*(phi + theta)])*Sin[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)^2*(4*(1 + 2*Cos[2*theta])* Sin[2*phi]*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)*Sin[phi]*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*Sin[phi]*(8*Cos[theta]^3*Sin[phi]^2*Sin[theta] + 4*Cos[2*phi]*Sin[4*theta] + Cos[phi]^2* (-7*Sin[2*theta] + 2*Sin[4*theta] - 3*Sin[ 6*theta])))))/(-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 3.75*^-13*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^ 2 + 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^ 3)) + 1.*^-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*(2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2* Sin[phi]^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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[ 4*theta])))^2)))/r^2) - 1.*^-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[phi]*Sin[theta]* ((-5.*^-7*Sin[phi]*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*Cos[theta]^2*Sin[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)*(2*Cos[phi]^2* Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2*Sin[theta]^2)/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)^2*Cos[theta]* (-1.*^-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]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* ((-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*(-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 + 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)*Cos[phi]*Sin[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)*Cos[theta]* (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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*theta])/2))))*( (-5.*^-7*(-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 + 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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*Cos[phi]* Cos[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* 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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))))/(r*(1 - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))) + (2.5*^-13*Sin[phi]*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*( 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* Cos[phi]*Cos[theta]*Sin[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)*(1 - 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)*Cos[phi]*Cos[theta]* Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))*((2.5*^-7* (-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*Sin[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*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)*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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*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) - (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)*Sin[theta]^2)* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (Cos[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)*Cos[phi]*Sin[3*theta] + 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)*Cos[phi]*Sin[3*theta]))/(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/(r*(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))) + 2.5*^-13*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[phi]* Sin[theta]*((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)* ((-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + 1.5*^-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[phi]*Cos[theta]*Sin[phi]* 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) + ((-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)*Sin[theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Cos[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + (2.5*^-7*Sin[phi]*((1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (3.*^-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)* (-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))))*((-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)* (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[theta]^2* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)* Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/r + (2.5*^-7*Sin[phi]*Sin[theta]*( (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 - 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) + 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))*Cos[phi]*Cos[2*theta]* Csc[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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 + 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) - 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))*Csc[theta]^2*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (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)*(-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[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))))*(((-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)* Cos[phi]*Cos[theta] - 2*Sin[theta] + 4.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Cos[theta]*Sin[theta]^2 + 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[theta]*Sin[2*theta])*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (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.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(-Cos[theta] - 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)*Cos[phi]* (-2*Sin[theta] + Sin[3*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)*Cos[phi]*(-Sin[theta] + Sin[3*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (1.*^-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)*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Sin[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/r - 5.*^-7*Sin[phi]* ((1.*^-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)* (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[theta]^2* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]* (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)*Cos[2*theta] + ((-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) + 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)*(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[theta]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 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) + (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)*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]* Cos[2*theta]^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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)* Sin[2*theta]*(-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)*Cos[phi]*Sin[ 2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*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)*Sin[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]*(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)* Cos[2*theta] + ((-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) + 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)*(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[theta]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 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) + (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)*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]* Cos[2*theta]^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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)* Sin[2*theta]*(-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)*Cos[phi]*Sin[ 2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^2 - (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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[theta]^2* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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*(-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))/2 + 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) + (-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))*Sin[theta]^2* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Sin[2*theta]* (2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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) + (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)*Sin[phi]^2* 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) + (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)/4)*Cos[phi]* Sin[2*theta]*(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)*Cos[phi]* Sin[2*theta]) + ((-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)*Cos[phi]*Sin[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))/4))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*Sin[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*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) + (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)*Cos[theta]* Sin[phi]^2*Sin[theta] - 5.*^-7*(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) + (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)/4)*Cos[phi]^2* Sin[4*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)* (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*(-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))/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) + (-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))*Cos[phi]* 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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (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)* Cos[phi]*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)* Cos[2*theta] + ((-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)*(2 - 2.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + ((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[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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (2.*^-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)* 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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*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)* Cos[phi]*Sin[2*theta] + 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)* Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[2*theta] - 2.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)*Cos[phi]* Sin[2*theta])*(-3.75*^-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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^3 + 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* Cos[phi]*(-18*(-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)*Cos[theta]*Sin[phi]^2* Sin[theta]^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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(-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 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 4.*^-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)*Cos[phi]* (-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))/4 + 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)*(((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2)/4 - 12*(-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)*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)* (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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*(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[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (((-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*Cos[theta]^3* Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*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*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))^2) + 5.*^-7*Sin[phi]* ((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)* Cos[phi]*Sin[2*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*Cos[phi]*Sin[theta]^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)^2*Cos[phi]*Sin[theta]^4 - 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)*(2.*^-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[phi]*Sin[theta]^ 4 + Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*(-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) + 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))*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))) - (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)* Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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) + 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))*Cos[phi]*Cos[2*theta]* (-Cos[2*theta] + 2.*^-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[phi]*Cos[theta]* Sin[theta]^3 + 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)*Cos[phi]*(-Sin[2*theta] + Sin[4*theta])))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))) + (4.*^-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)* (-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) + 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))*Cos[phi]*(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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))) + (2.*^-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)*(-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) + 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[phi]^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)* 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)*Sin[theta]^2)/2)*Sin[2*theta])/ (r*(-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))) + (9.999999999999999*^-19* (-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)* (-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) + 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[phi]*(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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta]*(-(Sin[phi]*Sin[theta]^2* (-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)^2*Cos[phi]*Sin[theta]^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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*Sin[theta]* (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)*Cos[theta]*(2 - 6*Cos[2*phi] + 3*Cos[2*(phi - theta)] + 6*Cos[2*theta] + 3*Cos[2*(phi + theta)]) + 16*Cos[phi]*Sin[theta]))/2 - 0.000054* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* (1 + 3*Cos[2*phi])*Sin[2*theta] + 9*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(8*Cos[phi]*(1 + 2*Cos[2*theta]) - 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)*(2 - 6*Cos[2*phi] + 3*Cos[2*(phi - theta)] + 6*Cos[2*theta] + 3*Cos[2*(phi + theta)])*Sin[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)^2*(4*(1 + 2*Cos[2*theta])* Sin[2*phi]*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)*Sin[phi]*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*Sin[phi]* (8*Cos[theta]^3*Sin[phi]^2*Sin[theta] + 4*Cos[2*phi]* Sin[4*theta] + Cos[phi]^2*(-7*Sin[2*theta] + 2*Sin[4*theta] - 3*Sin[6*theta])))))/ (r*(-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))^2) - (2.*^-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)*(-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) + 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))*Cos[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(1.*^-6*Sin[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)^3* (1 + 3*Cos[2*phi])*Cos[theta]*Sin[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*Cos[phi]*Sin[theta]^2)/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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(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*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]^2* (Cos[theta] + 3*Cos[3*theta]) + 4*Cos[theta]* Sin[phi]^2) - 4*Cos[phi]*Sin[theta]))/2 + 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* (-(Cos[phi]*(1 + 2*Cos[2*theta])) + 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)*(Cos[phi]^2*(Cos[theta] + 3*Cos[3*theta]) + 4*Cos[theta]*Sin[phi]^2)*Sin[theta])) + 2.5*^-7* (-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*(8*Cos[phi]*(1 + 2*Cos[2*theta])*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)*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 2*Sin[phi]^2*Sin[4*theta] + Cos[phi]^2*(-7*Sin[2*theta] + 6*Sin[4*theta] - 3*Sin[6*theta])))))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(1.*^-6*Sin[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)^3* (1 + 3*Cos[2*phi])*Cos[theta]*Sin[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*Cos[phi]*Sin[theta]^2)/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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(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*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]^2* (Cos[theta] + 3*Cos[3*theta]) + 4*Cos[theta]* Sin[phi]^2) - 4*Cos[phi]*Sin[theta]))/2 + 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* (-(Cos[phi]*(1 + 2*Cos[2*theta])) + 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)*(Cos[phi]^2*(Cos[theta] + 3*Cos[3*theta]) + 4*Cos[theta]*Sin[phi]^2)*Sin[theta])) + 2.5*^-7* (-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*(8*Cos[phi]*(1 + 2*Cos[2*theta])*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)*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 2*Sin[phi]^2*Sin[4*theta] + Cos[phi]^2*(-7*Sin[2*theta] + 6*Sin[4*theta] - 3*Sin[6*theta])))))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^2)) - 1.*^-6*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Sin[theta]^2* ((1.25*^-13*((-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[phi]* Sin[theta]*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta])))/(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]))) + (3.*^-12*((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[ phi]*Cos[theta]*Sin[phi]*Sin[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)*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)*Cos[phi]*Sin[2*theta] - 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* Cos[phi]^2*Sin[2*theta]^2))/2 - 2.5*^-13* (-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*((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)*Cos[theta]* (2*Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]) + 1.*^-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]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta])) + 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)*((-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*Cos[phi]*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)* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta]) + 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)*(2*Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]))))/(4 - 1.*^-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*Sin[phi]^2* Sin[theta]^2 - 2.1599999999999998*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 7.5*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 2.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]))) + (2.5*^-7*Sin[phi]*Sin[theta]*( 1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2* Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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* Cos[phi]*Sin[2*theta]) - 6.*^-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)*(-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^ 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)* Cos[phi]*Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[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*Cos[theta]^2*Sin[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)*(2*Cos[phi]^2* Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2*Sin[theta]^2)/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)^2*Cos[theta]* (-1.*^-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]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* ((-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*(-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 + 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)*Cos[phi]*Sin[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)*Cos[theta]* (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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*theta])/2)))))/ (r^2*(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))*(1 - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))) + (6.25*^-14*Csc[theta]*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*( 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* Cos[phi]*Cos[theta]*Sin[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)*(1 - 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)*Cos[phi]*Cos[theta]* Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))*(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)* (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) + r*(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) + (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))*Cos[2*theta]* Sin[2*phi] + 2.16*^-10*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]^2*Sin[phi]* (Sin[2*theta] + Sin[4*theta]) - 0.000036* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(-(Cos[2*theta]* Sin[2*phi]) + 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)*Cos[phi]^2*Sin[phi]* (4*Sin[2*theta] + 5*Sin[4*theta]) + 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)*Sin[phi]*(Sin[phi]^2* Sin[2*theta] + Cos[phi]^2*Sin[4*theta])) - 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)^2*(-((Cos[theta]^2 + Cos[2*theta])*Sin[2*phi]) + 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)*Sin[phi]*(2*Sin[phi]^2* Sin[2*theta] + Cos[phi]^2*Sin[4*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)*(8*Cot[theta]*Sin[phi] + 1.*^-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*(2 - 2*Cos[2*phi] + 5*Cos[2*(phi - theta)] - 2*Cos[2*theta] + 5*Cos[2*(phi + theta)])*Cot[theta]* Sin[phi] + 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)* (-4*Cos[2*theta]*Sin[2*phi] + 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)* Sin[phi]*(2*Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]) - 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[phi]* (2*Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[ 4*theta]))))/4 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cot[theta]*Sin[phi] - 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 + 4*Cos[2*theta])*Sin[2*phi] + 1.*^-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] + Cos[3*theta])*Csc[theta]*(Sin[phi] - Sin[3*phi]) + 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[phi]*(2*Sin[2*theta] + 3*Sin[4*theta]) + 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)* (2*Cos[2*theta]*Sin[2*phi] - 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)* Sin[phi]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]) + 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[phi]* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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)*(8.*^-6*Sin[phi]^3*Sin[2*theta] + 6.*^-6*Cos[phi]^ 2*Sin[phi]*Sin[4*theta]))/4))))/ (r^2*(-Csc[theta]^3 + 1.*^-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[phi]^2*Cos[2*theta]^2*Csc[theta]^3 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2 + 1.*^-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* Cot[theta]^2*Csc[theta]*Sin[phi]^2 + 4.999999999999999*^-19* (-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*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]* (Cos[phi]^2*Cos[2*theta]^2*Cot[theta]*Csc[theta] + Cos[theta]*(-2 + Cot[theta]^2)*Sin[phi]^2) + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^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*(4*Cos[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^2 - 2.*^-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[phi]*Cos[theta]*(Cos[phi]^2*Cos[theta]^2 + Sin[phi]^2)) + 6.*^-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.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)^2*Cos[phi]*Cos[theta]* (Cos[phi]^2*Cos[theta]^2 + Sin[phi]^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)^2*Cos[phi]*Cos[2*theta]* Cot[theta]*Csc[theta]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^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)*(Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2))/2))*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))) + (2.5*^-13*Sin[phi]*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*Cos[theta]^2*Sin[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)*(2*Cos[phi]^2* Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2*Sin[theta]^2)/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)^2*Cos[theta]* (-1.*^-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]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* ((-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*(-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 + 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)*Cos[phi]*Sin[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)*Cos[theta]* (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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*theta])/2))))*( (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)*(-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) + 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))*Cos[phi]*Cos[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta])))) + (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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (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)*(-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) + 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[phi]^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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))))))/(r*(1 - 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))) + (2.5*^-7*Sin[phi]*Sin[theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Sin[phi]^2* Sin[2*theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + 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)* (-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)*Cos[phi]*Cos[theta] - 2*Sin[theta] + 4.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Cos[theta]*Sin[theta]^2 + 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[theta]*Sin[2*theta])*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]*Cos[2*theta]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])) + 2*(1.*^-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[phi]^ 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)* Cos[phi]*Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(-Cos[theta] - 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)*Cos[phi]* (-2*Sin[theta] + Sin[3*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)*Cos[phi]*(-Sin[theta] + Sin[3*theta])))*((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 - 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) + 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))*Cos[phi]*Cos[2*theta]*Csc[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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 + 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) - 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))*Csc[theta]^2*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (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)*(-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[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/(r^2*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))) + (2.5*^-7*Sin[phi]*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* Cos[theta]^2*Sin[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)* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2* Sin[theta]^2)/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)^2* Cos[theta]*(-1.*^-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]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* ((-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*(-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 + 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)*Cos[phi]*Sin[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)*Cos[theta]* (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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*theta])/2))))*( (1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (3.*^-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)* (-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/(r^2*(1 - 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))) - (2.5*^-13*Sin[phi]*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*( 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* Cos[phi]*Cos[theta]*Sin[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)*(1 - 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)*Cos[phi]*Cos[theta]* Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))*((-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[theta]^2* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)* Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))/(r^2*(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))) - (6.25*^-8*Sin[phi]*Sin[theta]*(-8*(1 - 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*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*Cos[theta]^2*Sin[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)*(2*Cos[phi]^2*Cos[ 2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2* Sin[theta]^2)/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)^ 2*Cos[theta]*(-1.*^-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]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* ((-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*(-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 + 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)*Cos[phi]*Sin[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)* Cos[theta]*(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)^ 2*Cos[theta]*(2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2*Sin[ 2*theta] + (Cos[phi]^2*Sin[4*theta])/2)))) + 1.*^-12*r*(7.2*^-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* Cos[theta]^2*Sin[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)* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2* Sin[theta]^2)/2) + 4*r*Sin[theta]* ((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*(-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.*^-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)*Cos[phi]*Cos[theta]*Sin[theta])) + 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)^2*Cos[theta]* (8*Cos[phi]*Cos[2*theta] + 2.*^-6*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)*Cos[theta]* Sin[phi]^2*Sin[theta] - 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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta] + 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)*Cos[phi]^2* Sin[4*theta] + 1.*^-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)*(4*Cos[theta]* Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta])) - 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)* Cos[theta]*(2*r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[2*theta])) + 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)^2*(Sin[phi]^2*Sin[ 2*theta] + Cos[phi]^2*Sin[4*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)*(2*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*theta]))))*(-3.75*^-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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^3 + 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* Cos[phi]*(-18*(-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)*Cos[theta]*Sin[phi]^2* Sin[theta]^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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(-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 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(1 + 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)* Cos[phi]*Sin[2*theta]) - ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*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)* Cos[phi]*Sin[2*theta]))/4 - 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)* (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[phi]*(-4*Cos[theta]*Sin[phi]^2*Sin[theta]^ 3 + 2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))/4 + 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)*(((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2)/4 - 12*(-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)*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)* (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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*(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[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (((-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)*(4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 2*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] - Sin[phi]^2*Sin[4*theta]))/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)*(2*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))) + r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))*(2.*^-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*((-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 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)]))/4 - (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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)]))/4 + 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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)]) + 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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)]))*Sin[theta] + 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*(-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)* (8*Cos[phi]*Cos[theta]*Cos[2*theta] + 4.*^-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)*Cos[theta]^2*Sin[theta] - 4.*^-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)*Cos[2*phi]*Cos[theta]^2*Sin[theta] + 4.*^-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)*Cos[2*(phi - theta)]*Cos[theta]^2*Sin[theta] - 0.000048*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* Cos[theta]^2*(2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] + 2.*^-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)*Cos[theta]* Cos[2*(phi + theta)]*Sin[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)*Csc[theta]*Sin[2*theta]*Sin[4*theta] + 1.*^-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]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta])) + 4*((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.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)* Cos[theta]^2*(2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^ 2)*Sin[theta] - 2*(Cos[phi]*(Cos[theta] + Cos[ 3*theta]) + 1.*^-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]^2*(Cos[phi]^2* Cos[2*theta] + Sin[phi]^2)*Sin[theta] + 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)*Cos[theta]^2* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[ theta])) + 7.5*^-7*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*Cos[theta]*(4*Cos[theta]*Sin[phi]^2* Sin[theta] + Cos[phi]^2*Sin[4*theta]))) + 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* Cos[theta]^2*Sin[theta]*((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*Cos[phi]^2* Cos[2*theta] + Sin[phi]^2) + 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)/4 + (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))/4)*Cos[phi]^2* Sin[theta]^2) + 0.000018*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*Cos[phi]*Cos[theta]*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + Sin[theta]* ((-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 + (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))/2 + 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)*(-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)*Cos[phi]*Sin[ 2*theta])) + 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)* Sin[theta]*(-1 + 1.*^-6*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)*Cos[phi]*Cos[theta]*Sin[theta] + 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)*Cos[phi]*Sin[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)*Cos[phi]*(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)*Cos[phi]*Sin[2*theta]^2 - 2*Cos[theta]* Sin[theta]*(1 + 2.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)*Cos[phi]*Sin[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)* (2*Cos[phi]*Cos[theta]*Sin[theta]^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)/4 + 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)/4 + 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)*(-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)*Cos[phi]*Sin[2*theta]))) + (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[phi]*(Cos[theta] + Cos[3*theta]) + 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)*Cos[theta]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta])))))))/ (r^2*(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))^2) + (5.*^-7*((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* Cos[phi]*Cos[theta]*Sin[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)* (1 - 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)*Cos[phi]*Cos[theta]* Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))*(-4*Cos[2*theta]* Sin[phi] + 8.*^-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[phi]*Cos[theta]* Sin[phi]*Sin[theta]^3 + 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)*Sin[2*phi]*(-Sin[2*theta] + Sin[4*theta]))*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]))) + 5.*^-7*(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[phi]*Sin[2*theta]*(-4*Cos[phi]* Cos[2*theta] - 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-2 + 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]))) - 5.*^-13*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])* (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* Cos[phi]*Cos[theta]*Sin[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)* (1 - 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)*Cos[phi]*Cos[theta]* Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))*(0.000054* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[theta]*(Sin[phi] - 3*Sin[3*phi])*Sin[theta]^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)^2*Cos[phi]*Sin[phi]*Sin[theta]^4 - 72*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* Sin[phi]*Sin[theta]^2*(-(Cos[phi]*(1 + 2*Cos[2*theta])) + 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)*(Cos[phi]^2*(Cos[theta] + 3*Cos[3*theta]) + 4*Cos[theta]*Sin[phi]^2)*Sin[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)* (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)^2*Cos[theta]*(2 - 6*Cos[2*phi] + 3*Cos[ 2*(phi - theta)] + 6*Cos[2*theta] + 3*Cos[ 2*(phi + theta)])*Sin[phi]*Sin[theta]^3 + 4*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*Sin[2*phi]*Sin[theta]^4 - 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)^2*Sin[phi]*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*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)^ 2*(-4*(1 + 2*Cos[2*theta])*Sin[2*phi]*Sin[theta]^2 + 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)*Sin[phi]*(-8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Sin[phi]^2*Sin[4*theta] + Cos[phi]^2* (7*Sin[2*theta] - 6*Sin[4*theta] + 3*Sin[ 6*theta]))))))/(r^2*(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))^2))))/ (Sqrt[2]*r) - (-1.*^-6*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Sin[theta]^2* ((5.*^-7*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])* (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* Cos[phi]*Cos[theta]*Sin[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)*(1 - 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)*Cos[phi]*Cos[theta]* Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))*((1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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]*Sin[phi]^2*Sin[2*theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (Csc[theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))*(Cos[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)*Cos[phi]*Sin[3*theta] + 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)*Cos[phi]*Sin[3*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*Sin[phi]^2* (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)*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 - 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*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) + (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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r^2*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + 1.5*^-12*((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[phi]*Cos[theta]*Sin[theta]* ((-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) + ((-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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)*Cos[phi]*Sin[2*theta]* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + (2.5*^-13*Sin[phi]^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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Sin[2*theta]* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta]))* (-Cos[theta] - 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)*Cos[phi]* (-2*Sin[theta] + Sin[3*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)*Cos[phi]*(-Sin[theta] + Sin[3*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*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)*Cos[phi]*Cos[theta] + Sin[theta]*(1 - 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)* Cos[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]*Cos[theta]* Sin[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)*Cos[phi]*Sin[2*theta] + 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)*Cos[phi]*Sin[2*theta])))/(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((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 - 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) + 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))*Cos[phi]*Cos[2*theta]*Csc[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 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) - 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))*Csc[theta]^2* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r^2 + 2.5*^-13*((-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[phi]^2* Sin[theta]*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - ((1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta] - 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (3.*^-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)*(-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))^2/ (4*r^2) - (2.5*^-13*Sin[phi]^2*((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 - 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) + 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))*Cos[phi]*Cos[2*theta]* Csc[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 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) - 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))*Csc[theta]^2* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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)* (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[theta]^2* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Sin[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r^2 - (2.5*^-13*Sin[phi]^2*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*Cos[theta]^2*Sin[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)*(2*Cos[phi]^2* Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2*Sin[theta]^2)/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)^2*Cos[theta]* (-1.*^-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]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* ((-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*(-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 + 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)*Cos[phi]*Sin[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)*Cos[theta]* (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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*theta])/2))))* (-((Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r^2*(1 - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - (2.5*^-7*((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)*(-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) + 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))*Cos[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))) + (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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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) + 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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))*((1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta] - 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (3.*^-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)*(-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r - ((1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta] - 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (3.*^-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)*(-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - 1.*^-6*r*((-1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta]))* (-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]*(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)* Cos[2*theta] + ((-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) + 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)* (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[theta]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + (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)*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]* Cos[2*theta]^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)*Sin[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)*Cos[phi]*Sin[2*theta]))/ 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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^ 2 + ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta] - 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]* (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)*Cos[2*theta] + ((-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) + 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)*(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[theta]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 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) + (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)*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]* Cos[2*theta]^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)*Sin[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)*Cos[phi]*Sin[2*theta]))/ 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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^ 2 + (1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + 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)*Sin[theta]*(-1 + 1.*^-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[phi]*Cos[theta]*Sin[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)* Cos[phi]*Sin[2*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*theta]))/2))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (1.*^-6*(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*(-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 + 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) + (-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))*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - (Cos[phi]* (2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta])*(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)* (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[phi]*Cos[2*theta]^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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)* Sin[2*theta]*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + ((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*(-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))/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) + (-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))*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (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)*(-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[phi]^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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*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)*(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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))) + (6.*^-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)*(-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[phi]*Sin[phi]^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)* Cos[2*theta] + ((-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)* Sin[2*theta])/(-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))) - (5.999999999999999*^-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)* (-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta]*(3.75*^-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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^3 - 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* Cos[phi]*(-18*(-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)*Cos[theta]*Sin[phi]^2* Sin[theta]^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)*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + 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/4*((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2) + 12* (-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)*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2) - 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)* (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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*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)*(-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 + 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)*(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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*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)* (4*(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[phi]^2*Cos[2*theta]^2 + Cos[theta]^2* Sin[phi]^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*(-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*Cos[phi]^3*Cos[2*theta]^ 2*Sin[2*theta] + Cos[phi]*Sin[phi]^2*Sin[ 4*theta]) + ((-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)*(-4*Cos[phi]*Cos[theta]^3*Sin[phi]^2* Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2*Sin[ 2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))/4))))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))^2))/(2*r^2) + (5.*^-7*(Cos[phi]*((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 - 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) + 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))*Cos[phi]*Cos[2*theta]*Csc[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 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 + 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) - 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))*Csc[theta]^2*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))) + (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)* (-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[phi]* (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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))) + Sin[phi]* ((-1.9999999999999998*^-18*(-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) + 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))*Cos[phi]*Cos[2*theta]*Csc[theta]^3*Sin[phi]* (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)^3* (1 + 3*Cos[2*phi])*Cos[theta] + 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*(Cos[phi]*(-4*Cos[theta]* Cot[theta] + Csc[theta]) + 1.*^-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]*(Cos[phi]^2*(-2 + 3*Cos[theta]^2) + Sin[phi]^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*Csc[theta]*(4*Cos[phi]*(1 + 2*Cos[2*theta]) - 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)*Csc[theta]*(Cos[phi]^2*(4*Cos[theta] - 3*Cos[3*theta] + 3*Cos[5*theta]) + (Cos[theta] + 3*Cos[3*theta])*Sin[phi]^2)))/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)^2*Cos[phi]*Sin[theta])/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)*(-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)^2*Cos[theta]*(Cos[phi]^2*(-2 + 3*Cos[theta]^2) + Sin[phi]^2) + 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)^ 2*Cos[2*theta]*Cot[theta]*Csc[theta]*(Cos[phi]^2* (-2 + 3*Cos[2*theta]) + Sin[phi]^2) - 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)*Cos[phi]*Sin[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 + 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)^2*Cos[phi]*Cos[2*theta]* Cot[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*Cos[phi]*Cos[theta]* Sin[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta])))/ (-Csc[theta]^3 + 1.*^-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[phi]^2*Cos[2*theta]^2*Csc[theta]^3 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2 + 1.*^-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*Cot[theta]^2*Csc[theta]*Sin[phi]^2 + 4.999999999999999*^-19*(-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*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*(Cos[phi]^2*Cos[2*theta]^2*Cot[theta]* Csc[theta] + Cos[theta]*(-2 + Cot[theta]^2)*Sin[phi]^ 2) + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Cos[theta]*Cot[theta] + Csc[theta]*Sin[phi]^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* (4*Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2 - 2.*^-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[phi]*Cos[theta]* (Cos[phi]^2*Cos[theta]^2 + Sin[phi]^2)) + 6.*^-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.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)^2*Cos[phi]*Cos[theta]*(Cos[phi]^2*Cos[theta]^2 + Sin[phi]^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)^ 2*Cos[phi]*Cos[2*theta]*Cot[theta]*Csc[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^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)*(Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2))/2))^2 + (1.*^-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 - 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) + 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))*Csc[theta]^5*Sin[phi]*(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)^3* (1 + 3*Cos[2*phi])*Cos[theta] + 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*(Cos[phi]*(-4*Cos[theta]* Cot[theta] + Csc[theta]) + 1.*^-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]*(Cos[phi]^2*(-2 + 3*Cos[theta]^2) + Sin[phi]^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*Csc[theta]*(4*Cos[phi]*(1 + 2*Cos[2*theta]) - 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)*Csc[theta]*(Cos[phi]^2*(4*Cos[theta] - 3*Cos[3*theta] + 3*Cos[5*theta]) + (Cos[theta] + 3*Cos[3*theta])*Sin[phi]^2)))/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)^2*Cos[phi]*Sin[theta])/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)*(-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)^2*Cos[theta]*(Cos[phi]^2*(-2 + 3*Cos[theta]^2) + Sin[phi]^2) + 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)^ 2*Cos[2*theta]*Cot[theta]*Csc[theta]*(Cos[phi]^2* (-2 + 3*Cos[2*theta]) + Sin[phi]^2) - 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)*Cos[phi]*Sin[theta]))*Sin[2*theta]* (1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(-Csc[theta]^3 + 1.*^-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[phi]^2*Cos[2*theta]^ 2*Csc[theta]^3 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2 + 1.*^-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*Cot[theta]^2*Csc[theta]* Sin[phi]^2 + 4.999999999999999*^-19*(-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*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*(Cos[phi]^2*Cos[2*theta]^2*Cot[theta]* Csc[theta] + Cos[theta]*(-2 + Cot[theta]^2)*Sin[phi]^ 2) + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Cos[theta]*Cot[theta] + Csc[theta]*Sin[phi]^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* (4*Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2 - 2.*^-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[phi]*Cos[theta]* (Cos[phi]^2*Cos[theta]^2 + Sin[phi]^2)) + 6.*^-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.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)^2*Cos[phi]*Cos[theta]*(Cos[phi]^2*Cos[theta]^2 + Sin[phi]^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)^ 2*Cos[phi]*Cos[2*theta]*Cot[theta]*Csc[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^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)*(Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2))/2))^2 + (2.*^-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 - 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) + 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))*Cos[phi]*Cos[2*theta]*Csc[theta]*Sin[phi]* (-((-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]*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)* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[theta]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))) - (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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3) - 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))*Csc[theta]^2*Sin[phi]*Sin[2*theta]* (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)^2*Cos[phi]*Cos[2*theta]^ 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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*(336/(E^(r^2/4)*r^4) - (21* (16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*Cos[theta]* Sin[theta]))*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))) - (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 - 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) + 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))*Cos[2*theta]*Csc[theta]*Sin[phi]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))) - (3.*^-12*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)*Cos[phi]*Sin[phi]* (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)* 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)*Sin[theta]^2)/2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))) - (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)* (-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[phi]* (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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))) - (2.9999999999999994*^-18*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)* Cos[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta]* (-(Sin[phi]*Sin[theta]^2*(-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)^2*Cos[phi]*Sin[theta]^ 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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*Sin[theta]*(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)*Cos[theta]*(2 - 6*Cos[2*phi] + 3*Cos[2*(phi - theta)] + 6*Cos[2*theta] + 3*Cos[2*(phi + theta)]) + 16*Cos[phi]*Sin[theta]))/2 - 0.000054* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* (1 + 3*Cos[2*phi])*Sin[2*theta] + 9*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(8*Cos[phi]*(1 + 2*Cos[2*theta]) - 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)*(2 - 6*Cos[2*phi] + 3*Cos[2*(phi - theta)] + 6*Cos[2*theta] + 3*Cos[2*(phi + theta)])*Sin[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)^2*(4*(1 + 2*Cos[2*theta])* Sin[2*phi]*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)*Sin[phi]*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*Sin[phi]*(8*Cos[theta]^3*Sin[phi]^2*Sin[theta] + 4*Cos[2*phi]*Sin[4*theta] + Cos[phi]^2* (-7*Sin[2*theta] + 2*Sin[4*theta] - 3*Sin[ 6*theta])))))/(-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^ 2 + 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^ 3)) + 1.*^-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*(2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^ 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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[ 4*theta])))^2)))/r^2) + 1.*^-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[phi]* Cos[2*theta]*((-5.*^-7*Sin[phi]*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*Cos[theta]^2*Sin[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)*(2*Cos[phi]^2* Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2*Sin[theta]^2)/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)^2*Cos[theta]* (-1.*^-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]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* ((-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*(-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 + 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)*Cos[phi]*Sin[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)*Cos[theta]* (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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*theta])/2))))* ((-5.*^-7*(-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 + 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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* 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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))))/(r*(1 - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + (2.5*^-13*Sin[phi]*(4*Cos[phi]* Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])* (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* Cos[phi]*Cos[theta]*Sin[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)*(1 - 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)*Cos[phi]*Cos[theta]* Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))*((2.5*^-7* (-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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*Sin[2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]*Cos[2*theta]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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)* 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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*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) - (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)*Sin[theta]^2)* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (Cos[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)*Cos[phi]*Sin[3*theta] + 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)*Cos[phi]*Sin[3*theta]))/(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + 2.5*^-13*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[phi]* Sin[theta]*((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)* ((-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + 1.5*^-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[phi]*Cos[theta]*Sin[phi]* 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) + ((-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)*Sin[theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Cos[phi]*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + (2.5*^-7*Sin[phi]*((1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta] - 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (3.*^-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)*(-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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)* (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[theta]^2* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Sin[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r + (2.5*^-7*Sin[phi]*Sin[theta]*((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 - 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) + 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))*Cos[phi]*Cos[2*theta]* Csc[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 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) - 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))*Csc[theta]^2* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* (((-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)*Cos[phi]*Cos[theta] - 2*Sin[theta] + 4.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Cos[theta]*Sin[theta]^2 + 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[theta]*Sin[2*theta])*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(-Cos[theta] - 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)*Cos[phi]* (-2*Sin[theta] + Sin[3*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)*Cos[phi]*(-Sin[theta] + Sin[3*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Sin[phi]^2*Sin[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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r - 5.*^-7*Sin[phi]*((1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[theta]^2*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]* (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)*Cos[2*theta] + ((-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) + 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)*(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[theta]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + (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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]*Cos[2*theta]^ 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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)* Sin[2*theta]*(-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)*Cos[phi]* Sin[2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* 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)*Sin[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]*(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)* Cos[2*theta] + ((-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) + 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)*(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[theta]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + (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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]*Cos[2*theta]^ 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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)* Sin[2*theta]*(-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)*Cos[phi]* Sin[2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2 - (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)*(-336/(E^(r^2/4)* r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[theta]^2*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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*(-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))/2 + 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) + (-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))*Sin[theta]^2* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Sin[2*theta]* (2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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) + (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)*Sin[phi]^2*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) + (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)/4)*Cos[phi]*Sin[2*theta]*(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)*Cos[phi]*Sin[2*theta]) + ((-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)*Cos[phi]*Sin[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))/4))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*Sin[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*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) + (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)*Cos[theta]*Sin[phi]^2*Sin[theta] - 5.*^-7*(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) + (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)/4)*Cos[phi]^2*Sin[4*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(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*(-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))/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) + (-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))*Cos[phi]* 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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (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)* Cos[phi]*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)* Cos[2*theta] + ((-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)*(2 - 2.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]*Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + ((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[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]*Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (2.*^-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)* 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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta] + 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)* Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[2*theta] - 2.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)*Cos[phi]* Sin[2*theta])*(-3.75*^-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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^3 + 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* Cos[phi]*(-18*(-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)*Cos[theta]*Sin[phi]^2* Sin[theta]^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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(-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 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 4.*^-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)*Cos[phi]* (-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))/4 + 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)*(((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2)/4 - 12*(-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)*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)* (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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*(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[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (((-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*Cos[theta]^3* Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*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*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))^2) + 5.*^-7*Sin[phi]*((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)*Cos[phi]*Sin[2*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* Cos[phi]*Sin[theta]^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)^2*Cos[phi]*Sin[theta]^ 4 - 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)* (2.*^-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[phi]*Sin[theta]^4 + Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*(-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) + 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))*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))) - (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)*Sin[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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) + 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))*Cos[phi]*Cos[2*theta]* (-Cos[2*theta] + 2.*^-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[phi]*Cos[theta]* Sin[theta]^3 + 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)*Cos[phi]*(-Sin[2*theta] + Sin[4*theta])))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))) + (4.*^-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)*(-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) + 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))*Cos[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + (2.*^-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)* (-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) + 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[phi]^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)* 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)*Sin[theta]^2)/2)*Sin[2*theta])/(r*(-2 + 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + (9.999999999999999*^-19*(-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)*(-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) + 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[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta]*(-(Sin[phi]*Sin[theta]^2* (-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)^2*Cos[phi]*Sin[theta]^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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)*Sin[theta]* (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)*Cos[theta]*(2 - 6*Cos[2*phi] + 3*Cos[2*(phi - theta)] + 6*Cos[2*theta] + 3*Cos[2*(phi + theta)]) + 16*Cos[phi]*Sin[theta]))/2 - 0.000054* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* (1 + 3*Cos[2*phi])*Sin[2*theta] + 9*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(8*Cos[phi]*(1 + 2*Cos[2*theta]) - 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)*(2 - 6*Cos[2*phi] + 3*Cos[2*(phi - theta)] + 6*Cos[2*theta] + 3*Cos[2*(phi + theta)])*Sin[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)^2*(4*(1 + 2*Cos[2*theta])* Sin[2*phi]*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)*Sin[phi]*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*Sin[phi]*(8*Cos[theta]^3* Sin[phi]^2*Sin[theta] + 4*Cos[2*phi]*Sin[4*theta] + Cos[phi]^2*(-7*Sin[2*theta] + 2*Sin[4*theta] - 3*Sin[6*theta])))))/(r*(-2 + 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))^2) - (2.*^-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)*(-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) + 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))*Cos[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(1.*^-6*Sin[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)^3* (1 + 3*Cos[2*phi])*Cos[theta]*Sin[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*Cos[phi]*Sin[theta]^2)/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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(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*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]^2* (Cos[theta] + 3*Cos[3*theta]) + 4*Cos[theta]* Sin[phi]^2) - 4*Cos[phi]*Sin[theta]))/2 + 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* (-(Cos[phi]*(1 + 2*Cos[2*theta])) + 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)*(Cos[phi]^2*(Cos[theta] + 3*Cos[3*theta]) + 4*Cos[theta]*Sin[phi]^2)*Sin[theta])) + 2.5*^-7* (-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*(8*Cos[phi]* (1 + 2*Cos[2*theta])*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)* (Cos[phi]^2*(6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 2*Sin[phi]^2* Sin[4*theta] + Cos[phi]^2*(-7*Sin[2*theta] + 6*Sin[4*theta] - 3*Sin[6*theta])))))/(r* (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(1.*^-6*Sin[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)^3* (1 + 3*Cos[2*phi])*Cos[theta]*Sin[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*Cos[phi]*Sin[theta]^2)/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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(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*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]^2* (Cos[theta] + 3*Cos[3*theta]) + 4*Cos[theta]* Sin[phi]^2) - 4*Cos[phi]*Sin[theta]))/2 + 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* (-(Cos[phi]*(1 + 2*Cos[2*theta])) + 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)*(Cos[phi]^2*(Cos[theta] + 3*Cos[3*theta]) + 4*Cos[theta]*Sin[phi]^2)*Sin[theta])) + 2.5*^-7* (-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*(8*Cos[phi]* (1 + 2*Cos[2*theta])*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)* (Cos[phi]^2*(6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*theta]) + 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)*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 2*Sin[phi]^2* Sin[4*theta] + Cos[phi]^2*(-7*Sin[2*theta] + 6*Sin[4*theta] - 3*Sin[6*theta])))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2)) + r^2*(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)*Cos[phi]*Sin[2*theta])* ((1.25*^-13*((-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[phi]* Sin[theta]*(4*Cos[phi]*Cos[2*theta] + 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)* (2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta])))/(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) + (3.*^-12*((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[phi]*Cos[theta]*Sin[phi]* Sin[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)*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)*Cos[phi]*Sin[2*theta] - 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* Cos[phi]^2*Sin[2*theta]^2))/2 - 2.5*^-13* (-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* ((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)*Cos[theta]*(2*Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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*Sin[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]) + 1.*^-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]* (Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta])) + 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)* ((-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*Cos[phi]*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)*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta]) + 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)*(2*Sin[phi]^2* Sin[2*theta] + Cos[phi]^2*Sin[4*theta]))))/ (4 - 1.*^-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*Sin[phi]^2*Sin[theta]^2 - 2.1599999999999998*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 7.5*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 2.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) + (2.5*^-7*Sin[phi]*Sin[theta]*(1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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* Cos[phi]*Sin[2*theta]) - 6.*^-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)*(-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[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*Cos[theta]^2*Sin[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)*(2*Cos[phi]^2* Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2*Sin[theta]^2)/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)^2*Cos[theta]* (-1.*^-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]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* ((-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*(-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 + 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)*Cos[phi]*Sin[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)*Cos[theta]* (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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*theta])/2)))))/ (r^2*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])))* (1 - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + (6.25*^-14*Csc[theta]*(4*Cos[phi]* Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])* (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* Cos[phi]*Cos[theta]*Sin[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)*(1 - 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)*Cos[phi]*Cos[theta]* Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))*(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)*(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) + r*(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) + (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))*Cos[2*theta]*Sin[2*phi] + 2.16*^-10* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]^2*Sin[phi]* (Sin[2*theta] + Sin[4*theta]) - 0.000036* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(-(Cos[2*theta]* Sin[2*phi]) + 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)*Cos[phi]^2*Sin[phi]* (4*Sin[2*theta] + 5*Sin[4*theta]) + 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)*Sin[phi]*(Sin[phi]^2* Sin[2*theta] + Cos[phi]^2*Sin[4*theta])) - 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)^2*(-((Cos[theta]^2 + Cos[2*theta])*Sin[2*phi]) + 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)*Sin[phi]*(2*Sin[phi]^2* Sin[2*theta] + Cos[phi]^2*Sin[4*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)*(8*Cot[theta]*Sin[phi] + 1.*^-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*(2 - 2*Cos[2*phi] + 5*Cos[2*(phi - theta)] - 2*Cos[2*theta] + 5*Cos[2*(phi + theta)])*Cot[theta]* Sin[phi] + 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)* (-4*Cos[2*theta]*Sin[2*phi] + 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)* Sin[phi]*(2*Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]) - 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[phi]* (2*Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*theta]))))/ 4 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*Cot[theta]*Sin[phi] - 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 + 4*Cos[2*theta])* Sin[2*phi] + 1.*^-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] + Cos[3*theta])*Csc[theta]*(Sin[phi] - Sin[3*phi]) + 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[phi]* (2*Sin[2*theta] + 3*Sin[4*theta]) + 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)*(2*Cos[2*theta]* Sin[2*phi] - 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)* Sin[phi]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]) + 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[phi]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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)*(8.*^-6*Sin[phi]^3* Sin[2*theta] + 6.*^-6*Cos[phi]^2*Sin[phi]*Sin[ 4*theta]))/4))))/(r^2*(-Csc[theta]^3 + 1.*^-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[phi]^2* Cos[2*theta]^2*Csc[theta]^3 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2 + 1.*^-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*Cot[theta]^2* Csc[theta]*Sin[phi]^2 + 4.999999999999999*^-19* (-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* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*(Cos[phi]^2*Cos[2*theta]^2*Cot[theta]*Csc[theta] + Cos[theta]*(-2 + Cot[theta]^2)*Sin[phi]^2) + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^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*(4*Cos[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^2 - 2.*^-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[phi]*Cos[theta]*(Cos[phi]^2*Cos[theta]^2 + Sin[phi]^2)) + 6.*^-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.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)^2*Cos[phi]*Cos[theta]* (Cos[phi]^2*Cos[theta]^2 + Sin[phi]^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)^2*Cos[phi]*Cos[2*theta]* Cot[theta]*Csc[theta]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^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)*(Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2))/2))*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + (2.5*^-13*Sin[phi]*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* Cos[theta]^2*Sin[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)* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2* Sin[theta]^2)/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)^2*Cos[theta]* (-1.*^-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]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* ((-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*(-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 + 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)*Cos[phi]*Sin[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)*Cos[theta]* (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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*theta])/2))))* ((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)* (-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) + 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))*Cos[phi]*Cos[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))) + (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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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) + 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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))))))/(r*(1 - 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + (2.5*^-7*Sin[phi]*Sin[theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Sin[phi]^2*Sin[2*theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + 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)* (-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)*Cos[phi]*Cos[theta] - 2*Sin[theta] + 4.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Cos[theta]* Sin[theta]^2 + 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[theta]*Sin[2*theta])*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])) + 2* (1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(-Cos[theta] - 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)*Cos[phi]*(-2*Sin[theta] + Sin[3*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)*Cos[phi]* (-Sin[theta] + Sin[3*theta])))*((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 - 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) + 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))*Cos[phi]*Cos[2*theta]*Csc[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 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) - 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))*Csc[theta]^2* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r^2*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta])))) + (2.5*^-7*Sin[phi]*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* Cos[theta]^2*Sin[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)* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2* Sin[theta]^2)/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)^2*Cos[theta]* (-1.*^-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]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* ((-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*(-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 + 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)*Cos[phi]*Sin[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)*Cos[theta]* (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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*theta])/2))))* ((1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta] - 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (3.*^-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)*(-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r^2*(1 - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - (2.5*^-13*Sin[phi]*(4*Cos[phi]* Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])* (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* Cos[phi]*Cos[theta]*Sin[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)*(1 - 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)*Cos[phi]*Cos[theta]* Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))*((-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)* (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[theta]^2* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Sin[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r^2*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - (6.25*^-8*Sin[phi]*Sin[theta]* (-8*(1 - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*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* Cos[theta]^2*Sin[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)* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2* Sin[theta]^2)/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)^2* Cos[theta]*(-1.*^-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]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* ((-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*(-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 + 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)*Cos[phi]*Sin[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)*Cos[theta]* (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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*theta])/2)))) + 1.*^-12*r*(7.2*^-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* Cos[theta]^2*Sin[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)* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2* Sin[theta]^2)/2) + 4*r*Sin[theta]* ((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*(-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.*^-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)*Cos[phi]*Cos[theta]*Sin[theta])) + 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)^2*Cos[theta]* (8*Cos[phi]*Cos[2*theta] + 2.*^-6*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)*Cos[theta]*Sin[phi]^2*Sin[theta] - 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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta] + 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)*Cos[phi]^2* Sin[4*theta] + 1.*^-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)*(4*Cos[theta]*Sin[phi]^2* Sin[theta] + Cos[phi]^2*Sin[4*theta])) - 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)*Cos[theta]* (2*r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[2*theta])) + 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)^2*(Sin[phi]^2* Sin[2*theta] + Cos[phi]^2*Sin[4*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)*(2*Cos[phi]*Cos[2*theta] + 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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*theta]))))*(-3.75*^-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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^3 + 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* Cos[phi]*(-18*(-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)*Cos[theta]*Sin[phi]^2* Sin[theta]^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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(-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 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(1 + 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)* Cos[phi]*Sin[2*theta]) - ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*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)* Cos[phi]*Sin[2*theta]))/4 - 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)* (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[phi]*(-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])))/4 + 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)*(((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2)/4 - 12*(-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)*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)* (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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*(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[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (((-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)*(4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 2*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] - Sin[phi]^2*Sin[4*theta]))/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)*(2*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))) + r* (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))* (2.*^-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* ((-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 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)]))/4 - (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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)]))/4 + 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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)]) + 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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)]))*Sin[theta] + 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*(-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)* (8*Cos[phi]*Cos[theta]*Cos[2*theta] + 4.*^-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)*Cos[theta]^2*Sin[theta] - 4.*^-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)*Cos[2*phi]*Cos[theta]^2*Sin[theta] + 4.*^-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)*Cos[2*(phi - theta)]*Cos[theta]^2*Sin[theta] - 0.000048*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)* Cos[theta]^2*(2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] + 2.*^-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)*Cos[theta]* Cos[2*(phi + theta)]*Sin[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)*Csc[theta]*Sin[2*theta]*Sin[4*theta] + 1.*^-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]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta])) + 4*((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.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)* Cos[theta]^2*(2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] - 2*(Cos[phi]*(Cos[theta] + Cos[ 3*theta]) + 1.*^-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]^2*(Cos[phi]^2* Cos[2*theta] + Sin[phi]^2)*Sin[theta] + 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)*Cos[theta]^2* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[ theta])) + 7.5*^-7*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*Cos[theta]* (4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*theta]))) + 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*Cos[theta]^2*Sin[theta]* ((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*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2) + 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)/4 + (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))/4)*Cos[phi]^2* Sin[theta]^2) + 0.000018*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*Cos[phi]*Cos[theta]*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + Sin[theta]* ((-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 + (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))/2 + 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)*(-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)*Cos[phi]*Sin[ 2*theta])) + 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)* Sin[theta]*(-1 + 1.*^-6*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)*Cos[phi]*Cos[theta]* Sin[theta] + 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)*Cos[phi]* Sin[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)*Cos[phi]*(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)*Cos[phi]*Sin[2*theta]^2 - 2*Cos[theta]* Sin[theta]*(1 + 2.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)*Cos[phi]*Sin[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)* (2*Cos[phi]*Cos[theta]*Sin[theta]^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)/4 + 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)/4 + 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)*(-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)*Cos[phi]*Sin[ 2*theta]))) + (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[phi]* (Cos[theta] + Cos[3*theta]) + 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)*Cos[theta]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta])))))))/ (r^2*(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))^2) + (5.*^-7*((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* Cos[phi]*Cos[theta]*Sin[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)* (1 - 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)*Cos[phi]*Cos[theta]* Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))*(-4*Cos[2*theta]* Sin[phi] + 8.*^-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[phi]*Cos[theta]* Sin[phi]*Sin[theta]^3 + 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)*Sin[2*phi]*(-Sin[2*theta] + Sin[4*theta]))*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) + 5.*^-7* (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[phi]* Sin[2*theta]*(-4*Cos[phi]*Cos[2*theta] - 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-2 + 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) - 5.*^-13* (4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])* (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* Cos[phi]*Cos[theta]*Sin[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)* (1 - 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)*Cos[phi]*Cos[theta]* Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))*(0.000054* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[theta]*(Sin[phi] - 3*Sin[3*phi])*Sin[theta]^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)^2*Cos[phi]*Sin[phi]*Sin[theta]^4 - 72*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* Sin[phi]*Sin[theta]^2*(-(Cos[phi]*(1 + 2*Cos[2*theta])) + 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)*(Cos[phi]^2*(Cos[theta] + 3*Cos[3*theta]) + 4*Cos[theta]*Sin[phi]^2)*Sin[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)* (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)^2*Cos[theta]*(2 - 6*Cos[2*phi] + 3*Cos[2*(phi - theta)] + 6*Cos[2*theta] + 3*Cos[2*(phi + theta)])*Sin[phi]*Sin[theta]^3 + 4*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*Sin[2*phi]*Sin[theta]^4 - 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)^2*Sin[phi]*(Cos[phi]^2* (6*Cos[2*theta]^2*Sin[2*theta] - 2*Sin[4*theta]) + Sin[phi]^2*Sin[4*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)^2* (-4*(1 + 2*Cos[2*theta])*Sin[2*phi]*Sin[theta]^2 + 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)*Sin[phi]*(-8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Sin[phi]^2*Sin[4*theta] + Cos[phi]^2*(7*Sin[2*theta] - 6*Sin[4*theta] + 3*Sin[6*theta]))))))/ (r^2*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))^2)))/ (Sqrt[2]*r))/2))/(Sqrt[2]*r) - ((((-I)*Csc[theta]*(-1.*^-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[phi]* Sin[theta]*((-1.*^-6*(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*Cos[phi]* (-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)* Cos[theta]*Sin[phi]^2*Sin[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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + Cos[phi]* (-4.*^-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[phi]*Cos[2*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)*Sin[2*theta] + 1.*^-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[phi]^2* (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)*Cos[theta]*Sin[theta]^3 + 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)* Sin[4*theta])) - 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)* (-12*((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)* Sin[phi]^2*Sin[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)*(4*Sin[phi]^2* Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*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)*(12*((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)*Sin[phi]^2*Sin[theta]^2* (-1 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)* ((-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[phi]* (4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])))*((-5.*^-7*(-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 + 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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* 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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))))/(8 - 2.*^-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*Sin[phi]^2*Sin[theta]^ 2 - 4.3199999999999997*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 7.2*^-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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 4.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) + (1.25*^-7*(4*Cos[phi]*Cos[2*theta] + 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)* (2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*((-5.*^-13*(-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + ((-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] - 4.*^-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[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (2.*^-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Sin[phi]^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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) + 5.*^-7*((-5.*^-7*(-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 + 1.*^-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[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]* Sin[2*theta])*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( 2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((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)* ((-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 2.5*^-13*r*((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)* (-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) + 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))*Cos[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))) + (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)*Cos[phi]*Sin[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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) + 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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))* ((-2.5*^-7*(-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)* ((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)*Cos[phi]*Sin[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 2.5*^-13*Sin[phi]^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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[theta]^2*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Sin[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]*Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-2.5*^-7*((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)*Cos[phi]*Csc[theta]*Sin[2*theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*((-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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + 2.5*^-13*Sin[phi]^2*((2.5*^-7*(-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*Sin[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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)* 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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*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) - (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)*Sin[theta]^2)* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (Cos[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)* Cos[phi]*Sin[3*theta] + 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)*Cos[phi]*Sin[3*theta]))/( 2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 5.*^-7*((-2.5*^-7*(-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)* ((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)*Cos[phi]*Sin[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + r*((2.5*^-13*(-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)*((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)*Cos[phi]* Sin[2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]*Cos[2*theta]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]*(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)* Cos[2*theta] + ((-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) + 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)* (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[theta]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + (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)*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]*Sin[ 2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]* Cos[2*theta]^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)*Sin[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)*Cos[phi]*Sin[2*theta]))/ 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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*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)*Cos[phi]*Cos[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]*(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)* Cos[2*theta] + ((-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) + 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)* (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[theta]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + (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)*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]*Sin[ 2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]* Cos[2*theta]^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)*Sin[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)*Cos[phi]*Sin[2*theta]))/ 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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^ 2 - (2.5*^-7*(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)*((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)*Cos[phi]*Sin[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - (2.5*^-7* (-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)*((-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)*Cos[phi]* Sin[2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]*Cos[2*theta]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (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)*Cos[phi]*Cos[2*theta]* (2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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) + (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)*Sin[phi]^2* 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) + (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)/4)*Cos[phi]* Sin[2*theta]*(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)*Cos[phi]* Sin[2*theta]) + ((-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)*Cos[phi]* Sin[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[ 2*theta]))/4))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (((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[phi]*Cos[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - (2.5*^-7* (-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)*((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)*Cos[phi]* Sin[2*theta]*(-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) + (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)*Cos[theta]* Sin[phi]^2*Sin[theta] - 5.*^-7*(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) + (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)/4)*Cos[phi]^2* Sin[4*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - (1.*^-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)*(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) + ((-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)*Cos[phi]* Sin[phi]^2*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)* Cos[2*theta] + ((-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))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))) - (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) + ((-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)*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))) - (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) + ((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)/2)*Sin[phi]^2* 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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))) - (1.9999999999999998*^-18* (-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) + ((-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)*Sin[phi]^2* 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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (-3.75*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]* Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^3 + 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* Cos[phi]*(-18*(-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)*Cos[theta]*Sin[phi]^2* Sin[theta]^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)*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(-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 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 4.*^-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)*Cos[phi]* (-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))/4 + 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)*(((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2)/ 4 - 12*(-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)*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)* (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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*(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[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (((-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*Cos[theta]^3* Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*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*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))^2)) + 5.*^-7* ((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)* ((-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[phi]*Cos[2*theta]* (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)*(Cos[phi]^2*Cos[4*theta] + Cos[2*theta]*Sin[phi]^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)* (2*Cos[phi]^2*Cos[4*theta] + Cos[2*theta]*Sin[phi]^2) - 2*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]*Sin[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)* Cos[phi]*Cos[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (5.*^-13*(-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[phi]*Cos[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(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)^2* Sin[phi]^2*Sin[theta]*(-Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] + 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)*Cos[phi]*Sin[theta]^3) + 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)^2*Cos[theta]*Sin[phi]^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)*Cos[phi]* (Cos[theta] - 3*Cos[3*theta]) - 2*Sin[theta]* (1 + 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[phi]*Cos[theta]*Sin[theta])) - 2.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 4*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Cos[2*theta]* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])) + 4*Cos[phi]*Cos[2*theta]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[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)/4 - 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)^2*Cos[phi]*Sin[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 + 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)*Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[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)*Cos[theta] - 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)^2*Cos[phi]*(2 + 3*Cos[2*theta])*Sin[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)*(Cos[theta] + 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)*Cos[phi]*(Sin[theta] - 3*Sin[3*theta])) + 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* Cos[phi]*(Sin[theta] - 3*Sin[3*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2 - (1.5*^-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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))* (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)^2*Sin[phi]^2*Sin[theta]* (-Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] + 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)*Cos[phi]*Sin[theta]^3) + 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)^2*Cos[theta]*Sin[phi]^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)*Cos[phi]* (Cos[theta] - 3*Cos[3*theta]) - 2*Sin[theta]* (1 + 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[phi]*Cos[theta]*Sin[theta])) - 2.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 4*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Cos[2*theta]* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])) + 4*Cos[phi]*Cos[2*theta]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[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)/4 - 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)^2*Cos[phi]*Sin[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 + 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)*Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[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)*Cos[theta] - 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)^2*Cos[phi]*(2 + 3*Cos[2*theta])*Sin[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)*(Cos[theta] + 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)*Cos[phi]*(Sin[theta] - 3*Sin[3*theta])) + 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* Cos[phi]*(Sin[theta] - 3*Sin[3*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2 + (6.*^-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)* Cos[phi]*Sin[2*theta]*(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*Cos[theta]*Sin[phi]^2* Sin[theta] + 6.25*^-8*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)^2*(4*Cos[theta]* Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*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)* (Cos[phi]*Cos[2*theta] - 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)*(4*Cos[theta]*Sin[phi]^2* Sin[theta] + Cos[phi]^2*Sin[4*theta]))))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (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)* ((-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[phi]^2* 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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (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)* ((-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[phi]^2* Sin[theta]*(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)*Cos[phi]*Sin[2*theta] + 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)*Cos[phi]*Sin[2*theta]))/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (3.9999999999999995*^-18*(-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]*Sin[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (-0.000054*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*(1 + 2*Cos[2*theta])*Sin[phi]^2*Sin[theta]^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)^2*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*theta]))/8 - 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*(Cos[theta]*Sin[phi]^2* Sin[theta] - 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)*Cos[phi]* (4*(1 + 2*Cos[2*theta])*Sin[phi]^2*Sin[theta]^2 + 3*Cos[phi]^2*Cos[2*theta]*Sin[2*theta]^2) + Cos[phi]^2* Sin[4*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)^2*(-1.25*^-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)*Cos[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) - 2*(Cos[2*theta] - 3*Cos[4*theta])* Sin[phi]^2) + Sin[phi]^2*Sin[2*theta] + 2*Cos[phi]^2* Sin[4*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)*(4.*^-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[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[ 6*theta]) + 4*Cos[4*theta]*Sin[phi]^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)*Sin[theta]*(16*Cos[theta]*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)]) + 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)*(9*Sin[phi - 5*theta] + 3*Sin[3*phi - 5*theta] + 17*Sin[phi - 3*theta] - 5*Sin[3*(phi - theta)] + 5*Sin[3*(phi + theta)] - 17*Sin[phi + 3*theta] - 9*Sin[phi + 5*theta] - 3*Sin[3*phi + 5*theta])))/4))/8))/(-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))^ 2)) + r^2*Sin[theta]^2*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])*((1.25*^-13*Sin[phi]*(4*Cos[phi]*Cos[2*theta] + 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)* (2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*((-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)*Cos[phi]*Cos[2*theta]* Csc[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + (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))/4)*Csc[theta]^2* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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)*(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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (2 + 4.*^-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[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[2*theta] - 2.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)*Cos[phi]*Sin[2*theta]))/(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - (2.5*^-13*Sin[phi]* ((-2.5*^-7*(-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)* ((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)*Cos[phi]*Sin[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((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 - 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) + 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))*Cos[phi]*Cos[2*theta]*Csc[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 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) - 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))*Csc[theta]^2* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r - (5.*^-13*Sin[phi]*(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*Cos[phi]* (-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)* Cos[theta]*Sin[phi]^2*Sin[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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + Cos[phi]* (-4.*^-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[phi]*Cos[2*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)*Sin[2*theta] + 1.*^-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[phi]^2* (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)*Cos[theta]*Sin[theta]^3 + 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)* Sin[4*theta])) - 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)* (-12*((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)* Sin[phi]^2*Sin[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)*(4*Sin[phi]^2* Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*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)*(12*((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)*Sin[phi]^2*Sin[theta]^2* (-1 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)* ((-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[phi]* (4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])))*(-((Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(8 - 2.*^-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*Sin[phi]^2*Sin[theta]^2 - 4.3199999999999997*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 7.2*^-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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 4.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + (2.5*^-13*Sin[phi]* ((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)* ((-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* (-((Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r + (2.5*^-7*Sin[phi]*((1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta] - 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (3.*^-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)*(-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-2.5*^-7*((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)*Cos[phi]*Csc[theta]*Sin[2*theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*((-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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r + (5.*^-7*Sin[phi]*((1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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]*Sin[phi]^2* Sin[2*theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (Csc[theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))*(Cos[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)*Cos[phi]*Sin[3*theta] + 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)*Cos[phi]*Sin[3*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*Sin[phi]^2* (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)*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 - 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*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) + (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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r - 5.*^-7*Sin[phi]*((2.5*^-13*((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)*Cos[phi]*Csc[theta]* Sin[2*theta]*(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)^2* Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]* (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)*Cos[2*theta] + ((-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) + 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)*(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[theta]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + (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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]* Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]*Cos[2*theta]^ 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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)* Sin[2*theta]*(-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)*Cos[phi]* Sin[2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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) + ((-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)*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]*(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)* Cos[2*theta] + ((-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) + 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)*(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[theta]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + (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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]* Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]*Cos[2*theta]^ 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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)* Sin[2*theta]*(-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)*Cos[phi]* Sin[2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2 - (2.5*^-7*((-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)*Cos[phi]* Csc[theta]*Sin[2*theta]*(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)^2* Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (2.5*^-7*((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)*Cos[phi]*Csc[theta]* Sin[2*theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Cos[phi]*(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)* (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[phi]*Cos[2*theta]^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)*Sin[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)*Cos[phi]*Sin[2*theta]))/ 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)*Sin[2*theta]* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((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)/2)* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*Cos[phi]^2*Cos[2*theta]*(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)* Cos[2*theta] + ((-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))/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (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)*((-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (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)* ((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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (1.9999999999999998*^-18*(-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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (-3.75*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^3 + 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* Cos[phi]*(-18*(-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)*Cos[theta]*Sin[phi]^2* Sin[theta]^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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(-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 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 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)*(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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))/4 + 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)*(((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2)/4 - 12*(-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)*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)* (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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*(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[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (((-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*Cos[theta]^3* Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*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*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))^2) + (5.*^-7*Sin[phi]*((-6.*^-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)*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]^2*Cos[2*theta]^2)/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (5.*^-7*((-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*Cos[2*theta]*Cot[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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (2.*^-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*Sin[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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*((-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[phi]*Cos[2*theta]*Cot[theta]*(-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Csc[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (5.*^-13*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta])*(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)^ 2*Sin[phi]^2*Sin[theta]*(-Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] + 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)*Cos[phi]*Sin[theta]^3) + 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)^2*Cos[theta]*Sin[phi]^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)* Cos[phi]*(Cos[theta] - 3*Cos[3*theta]) - 2*Sin[theta]* (1 + 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[phi]*Cos[theta]*Sin[theta])) + 4*Cos[phi]* 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)/4 + 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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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)^2*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]) - 2.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 4*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Cos[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[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)*Cos[theta] - 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)^2*Cos[phi]*(2 + 3*Cos[2*theta])*Sin[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)*(Cos[theta] + 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)*Cos[phi]*(Sin[theta] - 3*Sin[3*theta])) + 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* Cos[phi]*(Sin[theta] - 3*Sin[3*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^2 + (5.*^-7* ((-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)*Cot[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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])* (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)^2*Sin[phi]^2*Sin[theta]* (-Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] + 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)*Cos[phi]*Sin[theta]^ 3) + 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)^2*Cos[theta]*Sin[phi]^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)* Cos[phi]*(Cos[theta] - 3*Cos[3*theta]) - 2*Sin[theta]* (1 + 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[phi]*Cos[theta]*Sin[theta])) + 4*Cos[phi]* 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)/4 + 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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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)^2*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]) - 2.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 4*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Cos[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[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)*Cos[theta] - 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)^2*Cos[phi]*(2 + 3*Cos[2*theta])*Sin[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)*(Cos[theta] + 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)*Cos[phi]*(Sin[theta] - 3*Sin[3*theta])) + 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* Cos[phi]*(Sin[theta] - 3*Sin[3*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^2 + (6.*^-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)*Cos[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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)*Cos[phi]*Sin[2*theta]* (Csc[theta]^2 + 1.*^-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[phi]*Cos[theta]* Sin[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)*Cos[phi]*Sin[2*theta]))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (1.1999999999999998*^-17*((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)* Cos[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta]* (-0.000054*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*(1 + 2*Cos[2*theta])*Sin[phi]^2*Sin[theta]^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)^2*(2*Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]))/8 - 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*(Cos[theta]*Sin[phi]^2* Sin[theta] - 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)*Cos[phi]* (4*(1 + 2*Cos[2*theta])*Sin[phi]^2*Sin[theta]^2 + 3*Cos[phi]^2*Cos[2*theta]*Sin[2*theta]^2) + Cos[phi]^2* Sin[4*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)^ 2*(-1.25*^-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)*Cos[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) - 2*(Cos[2*theta] - 3*Cos[4*theta])* Sin[phi]^2) + Sin[phi]^2*Sin[2*theta] + 2*Cos[phi]^2* Sin[4*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)*(4.*^-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[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[ 6*theta]) + 4*Cos[4*theta]*Sin[phi]^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)*Sin[theta]*(16*Cos[theta]*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)]) + 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)*(9*Sin[phi - 5*theta] + 3*Sin[3*phi - 5*theta] + 17*Sin[phi - 3*theta] - 5*Sin[3*(phi - theta)] + 5*Sin[3*(phi + theta)] - 17*Sin[phi + 3*theta] - 9*Sin[phi + 5*theta] - 3*Sin[3*phi + 5*theta])))/4))/8))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))^2))/r) - 1.*^-6*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Sin[theta]^2* ((5.*^-7*(1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2*Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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* Cos[phi]*Sin[2*theta]) - 6.*^-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)*(-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))*(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*Cos[phi]* (-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)* Cos[theta]*Sin[phi]^2*Sin[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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + Cos[phi]* (-4.*^-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[phi]*Cos[2*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)*Sin[2*theta] + 1.*^-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[phi]^2* (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)*Cos[theta]*Sin[theta]^3 + 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)* Sin[4*theta])) - 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)* (-12*((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)* Sin[phi]^2*Sin[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)*(4*Sin[phi]^2* Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*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)*(12*((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)*Sin[phi]^2*Sin[theta]^2* (-1 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)* ((-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[phi]* (4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]))))/(r*(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])))* (8 - 2.*^-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*Sin[phi]^2*Sin[theta]^2 - 4.3199999999999997*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 7.2*^-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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 4.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + (6.25*^-14*Csc[theta]*(4*Cos[phi]* Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*(0.000072*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*Cos[phi]*Cos[theta]^2 + Cot[theta])*Sin[phi]^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)*Csc[theta]^2* (4 - 2.*^-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[phi]*Cos[theta]*Sin[theta] - 1.*^-6*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)*Cos[phi]* Cos[theta]*Sin[theta])*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta]))/4 + 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)^2*(Cos[phi]^2*(Cos[theta] + Cos[3*theta])*Csc[theta] + 6*Cot[theta]*Sin[phi]^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)*Cos[phi]*(12*Cos[theta]^2* Sin[phi]^2 + Cos[phi]^2*Cot[theta]*Sin[4*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)* (-(Cos[phi]*(-1 + Cot[theta]^2)) + 0.000021* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*Cot[theta]* Sin[phi]^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*Cos[phi]*(14*Cos[theta]^2* Sin[phi]^2 + Cos[phi]^2*Cot[theta]*Sin[4*theta])) + 8.*^-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[phi]*(-(Cos[phi]*(Cos[theta] + Cos[3*theta])* Csc[theta]) + 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)*(-4*Cos[theta]^2* Sin[phi]^2 + Cos[2*theta]*Cot[theta]^2*Sin[phi]^2 - Cos[phi]^2*Cot[theta]*Sin[4*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)* (2*Cos[theta]^2*Sin[phi]^2 + Cot[theta]*(-(Cos[2*theta]* Cot[theta]*Sin[phi]^2) + Cos[phi]^2*Sin[4*theta])))))/ (r*(-Csc[theta]^3 + 1.*^-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[phi]^2* Cos[2*theta]^2*Csc[theta]^3 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2 + 1.*^-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*Cot[theta]^2* Csc[theta]*Sin[phi]^2 + 4.999999999999999*^-19* (-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* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*(Cos[phi]^2*Cos[2*theta]^2*Cot[theta]*Csc[theta] + Cos[theta]*(-2 + Cot[theta]^2)*Sin[phi]^2) + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^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*(4*Cos[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^2 - 2.*^-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[phi]*Cos[theta]*(Cos[phi]^2*Cos[theta]^2 + Sin[phi]^2)) + 6.*^-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.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)^2*Cos[phi]*Cos[theta]* (Cos[phi]^2*Cos[theta]^2 + Sin[phi]^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)^2*Cos[phi]*Cos[2*theta]* Cot[theta]*Csc[theta]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^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)*(Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2))/2))*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - (2.5*^-7*(1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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* Cos[phi]*Sin[2*theta]) - 6.*^-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)*(-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))* ((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)* ((-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta])))) - (2.5*^-13*(4*Cos[phi]*Cos[2*theta] + 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)* (2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])* (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* Cos[phi]*Cos[theta]*Sin[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)*(1 - 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)*Cos[phi]*Cos[theta]* Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))*((-2.5*^-7* (-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)* ((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)*Cos[phi]*Sin[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - (2.5*^-13*Sin[phi]^2*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* Cos[theta]^2*Sin[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)* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2* Sin[theta]^2)/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)^2*Cos[theta]* (-1.*^-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]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* ((-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*(-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 + 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)*Cos[phi]*Sin[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)*Cos[theta]* (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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*theta])/2))))* ((-2.5*^-7*((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)*Cos[phi]*Csc[theta]*Sin[2*theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*((-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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(1 - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - (1.*^-6*(-2.*^-12* (-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)*(-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[phi]^2* Sin[theta]^2 - 7.5*^-7*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(-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)*Cos[phi]*Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^3 - 0.000648* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^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)*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - (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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]))/4 - (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)* (-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]))/4 - ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ 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)*Cos[phi]^2* Sin[2*theta]^2)/2 + 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*(-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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^ 3 + Cos[phi]^2*Sin[2*theta]^3) + 72*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^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)* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^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)^2*Cos[phi]* (((-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)*(4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*theta]))/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)*(2*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*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)*(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*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))* (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* Cos[phi]*(-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)* Cos[theta]*Sin[phi]^2*Sin[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)*(4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + Cos[phi]*(-4.*^-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[phi]*Cos[2*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)*Sin[2*theta] + 1.*^-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[phi]^2*(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)*Cos[theta]* Sin[theta]^3 + 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)*Sin[4*theta])) - 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)*(-12*((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)* Sin[phi]^2*Sin[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)*(4*Sin[phi]^2* Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*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)* (12*((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)* Sin[phi]^2*Sin[theta]^2*(-1 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)* ((-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[phi]* (4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]))) + (8 - 2.*^-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*Sin[phi]^2*Sin[theta]^ 2 - 4.3199999999999997*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 7.2*^-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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 4.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))* (7.200000000000001*^-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)*(-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)* Cos[phi]*(-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)* Cos[theta]*Sin[phi]^2*Sin[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)*(4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + 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* Cos[phi]*(-6*((-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)*Cos[theta]*Sin[phi]^2* Sin[theta]^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*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) - 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)* (-12*((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)* Sin[phi]^2*Sin[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)*(4*Sin[phi]^2* Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])) - 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)*(-12*((-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)*Sin[phi]^2*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)*(4*Sin[phi]^2* Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2))/2 + 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)*((-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[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)* ((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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])) + 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)*(12*((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)*Sin[phi]^2*Sin[theta]^2* (-1 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)* ((-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[phi]* (4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)*(0.000012*((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)*(-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)*Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^ 3 + 12*((-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)*Sin[phi]^2*Sin[theta]^ 2*(-1 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 2.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)*((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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^ 3 + Cos[phi]^2*Sin[2*theta]^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)*(-2*Sin[phi]^2* Sin[theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 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)*((-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[phi]*(4*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*((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[phi]* (4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])) + Cos[phi]*(-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)* ((-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[phi]* Cos[2*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)*Sin[2*theta])/ 4) + 1.*^-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[phi]^2* (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)*Cos[theta]* Sin[theta]^3 + 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)*Sin[4*theta]) + 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)* (-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[phi]* Cos[2*theta]^2 + 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)*Sin[phi]^2* (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)*Cos[theta]*Sin[theta]^3 + 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)* Sin[4*theta]))))))/(-8 + 2.*^-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*Sin[phi]^2*Sin[theta]^2 + 4.3199999999999997*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 - 7.2*^-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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 4.*^-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))^ 2 + (6.25*^-14*Csc[theta]*Sin[phi]*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*(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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*Sin[2*theta])/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* (2.16*^-10*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]^2*Sin[phi]*(Sin[2*theta] + Sin[4*theta]) - 0.000036* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(-(Cos[2*theta]* Sin[2*phi]) + 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)*Cos[phi]^2*Sin[phi]* (4*Sin[2*theta] + 5*Sin[4*theta]) + 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)*Sin[phi]*(Sin[phi]^2* Sin[2*theta] + Cos[phi]^2*Sin[4*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)*(-8*Cot[theta]*Sin[phi] - 1.*^-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 + 4*Cos[2*theta])*Sin[2*phi] + 2.*^-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] + Cos[3*theta])*Csc[theta]*(Sin[phi] - Sin[3*phi]) + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[phi]*(2*Sin[2*theta] + 3*Sin[4*theta]) + 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)* (2*Cos[2*theta]*Sin[2*phi] - 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)* Sin[phi]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]) + 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[phi]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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)*(8.*^-6*Sin[phi]^3* Sin[2*theta] + 6.*^-6*Cos[phi]^2*Sin[phi]*Sin[ 4*theta]))/4)) + 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)* (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) + r*(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) + (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))*Cos[2*theta]* Sin[2*phi] + 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)^2*((Cos[theta]^2 + Cos[2*theta])*Sin[2*phi] - 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)* Sin[phi]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*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)*(4*Cot[theta]*Sin[phi] + 5.*^-13*(-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*(2 - 2*Cos[2*phi] + 5*Cos[2*(phi - theta)] - 2*Cos[2*theta] + 5*Cos[2*(phi + theta)])*Cot[theta]*Sin[phi] + 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)*(-4*Cos[2*theta]* Sin[2*phi] + 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)* Sin[phi]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta]) - 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[phi]* (4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*theta]))))/4)))/(r*(-Csc[theta]^3 + 1.*^-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[phi]^2* Cos[2*theta]^2*Csc[theta]^3 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2 + 1.*^-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*Cot[theta]^2* Csc[theta]*Sin[phi]^2 + 4.999999999999999*^-19* (-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* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*(Cos[phi]^2*Cos[2*theta]^2*Cot[theta]*Csc[theta] + Cos[theta]*(-2 + Cot[theta]^2)*Sin[phi]^2) + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^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*(4*Cos[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^2 - 2.*^-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[phi]*Cos[theta]*(Cos[phi]^2*Cos[theta]^2 + Sin[phi]^2)) + 6.*^-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.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)^2*Cos[phi]*Cos[theta]* (Cos[phi]^2*Cos[theta]^2 + Sin[phi]^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)^2*Cos[phi]*Cos[2*theta]* Cot[theta]*Csc[theta]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^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)*(Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2))/2))) + (2.5*^-7*(-2.*^-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[phi]*Cos[2*theta]*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) + (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)*Cos[2*theta]*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + 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)* Cos[2*theta]*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)]) - 8*Cos[phi]* Sin[2*theta] + 0.000024*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*Cos[phi]^2*Sin[2*theta]^2 - 2.*^-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[phi]^2*Sin[2*theta]^2)*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) - 5.*^-13* (4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*(-0.000216*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*(1 + 2*Cos[2*theta])* Sin[phi]^2*Sin[theta]^2 - 72*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)^2*(Cos[theta]*Sin[phi]^2* Sin[theta] - 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)*Cos[phi]* (4*(1 + 2*Cos[2*theta])*Sin[phi]^2*Sin[theta]^2 + 3*Cos[phi]^2*Cos[2*theta]*Sin[2*theta]^2) + Cos[phi]^2* Sin[4*theta]) - 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)^2*(4*Cos[theta]* Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*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*(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)*Cos[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) - 2*(Cos[2*theta] - 3*Cos[4*theta])* Sin[phi]^2) - 4*(Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*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)*(4.*^-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[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[ 6*theta]) + 4*Cos[4*theta]*Sin[phi]^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)*Sin[theta]*(16*Cos[theta]*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)]) + 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)*(9*Sin[phi - 5*theta] + 3*Sin[3*phi - 5*theta] + 17*Sin[phi - 3*theta] - 5*Sin[3*(phi - theta)] + 5*Sin[3*(phi + theta)] - 17*Sin[phi + 3*theta] - 9*Sin[phi + 5*theta] - 3*Sin[3*phi + 5*theta])))/4))/2)))/ (r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))^2))))/ (Sqrt[2]*r) + (1.*^-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[phi]*Cos[2*theta]* ((-1.*^-6*(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*Cos[ phi]*(-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)*Cos[theta]*Sin[phi]^2* Sin[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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + Cos[phi]*(-4.*^-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[phi]*Cos[2*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)*Sin[2*theta] + 1.*^-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[phi]^2*(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)*Cos[theta]*Sin[theta]^3 + 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)* Sin[4*theta])) - 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)*(-12* ((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)*Sin[phi]^2*Sin[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)*(4*Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2* Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*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)*(12*((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)* Sin[phi]^2*Sin[theta]^2*(-1 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)*((-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[phi]*(4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))*((-5.*^-7*(-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 + 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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( 2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))))/(8 - 2.*^-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*Sin[phi]^2* Sin[theta]^2 - 4.3199999999999997*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[ 2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 7.2*^-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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 4.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)* Cos[phi]*(-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]))) + (1.25*^-7*(4*Cos[phi]*Cos[2*theta] + 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)*( 2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]*Sin[2*theta]))* ((-5.*^-13*(-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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*Cos[2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + ((-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] - 4.*^-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[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (2.*^-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Sin[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[ 2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)* Cos[phi]*(-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]))) + 5.*^-7*((-5.*^-7*(-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 + 1.*^-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[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]* Sin[2*theta])*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Cos[phi]*Cos[2*theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) + (1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((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)*( (-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[phi]*Cos[2*theta]*( -1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Cos[phi]*Sin[2*theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 2.5*^-13*r*((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)*( -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) + 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))*Cos[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))) + (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)*Cos[phi]*Sin[2*theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) + (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)*(-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) + 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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))* ((-2.5*^-7*(-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)*( (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)*Cos[phi]*Sin[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Cos[phi]*Cos[2*theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - (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) + ((-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)*Sin[phi]^2*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 2.5*^-13*Sin[phi]^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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[theta]^2*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Sin[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*( 2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]*Sin[2*theta]))/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-2.5*^-7*((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)*Cos[phi]*Csc[theta]*Sin[2*theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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) + ((-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)*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) + (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)*((-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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + 2.5*^-13*Sin[phi]^2*((2.5*^-7*(-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*Sin[2*theta]*( -1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*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)*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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*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) - (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)*Sin[theta]^2)*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Sin[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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*( Cos[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)* Cos[phi]*Sin[3*theta] + 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)*Cos[phi]*Sin[3*theta]))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]*Sin[2*theta]))/ (1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Cot[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)*Cos[phi]* Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))/ (1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Cos[phi]*(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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - 5.*^-7*((-2.5*^-7*(-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)*( (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)*Cos[phi]*Sin[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Cos[phi]*Cos[2*theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - (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) + ((-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)*Sin[phi]^2*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + r*((2.5*^-13*(-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)* ((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)*Cos[phi]*Sin[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]* (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)*Cos[2*theta] + ((-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) + 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)*(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[theta]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 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) + (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)*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]*Sin[ 2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]* Cos[2*theta]^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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)* Sin[2*theta]*(-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)*Cos[phi]*Sin[ 2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*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)*Cos[phi]*Cos[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]*(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)* Cos[2*theta] + ((-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) + 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)*(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[theta]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 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) + (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)*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]*Sin[ 2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]* Cos[2*theta]^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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)* Sin[2*theta]*(-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)*Cos[phi]*Sin[ 2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^2 - (2.5*^-7* (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)*((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)*Cos[phi]*Sin[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (2.5*^-7*(-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)*((-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)*Cos[phi]* Sin[2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]*Cos[2*theta]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*Cos[phi]*Cos[2*theta]*(2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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) + (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)*Sin[phi]^2* 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) + (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)/4)*Cos[phi]* Sin[2*theta]*(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)*Cos[phi]* Sin[2*theta]) + ((-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)*Cos[phi]*Sin[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))/4))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (((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[phi]* Cos[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (2.5*^-7*(-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)*((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)*Cos[phi]* Sin[2*theta]*(-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) + (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)*Cos[theta]* Sin[phi]^2*Sin[theta] - 5.*^-7*(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) + (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)/4)*Cos[phi]^2* Sin[4*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (1.*^-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)* (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) + ((-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)*Cos[phi]*Sin[phi]^2*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)*Cos[2*theta] + ((-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))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (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) + ((-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)*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (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) + ((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)/2)*Sin[phi]^2* 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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (1.9999999999999998*^-18*(-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) + ((-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)*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (-3.75*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^3 + 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* Cos[phi]*(-18*(-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)*Cos[theta]*Sin[phi]^2* Sin[theta]^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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(-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 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 4.*^-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)*Cos[phi]* (-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))/4 + 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)*(((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2)/4 - 12*(-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)*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)* (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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*(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[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (((-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*Cos[theta]^3* Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*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*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))^2)) + 5.*^-7* ((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)*( (-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[phi]*Cos[2*theta]*( 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)*(Cos[phi]^2*Cos[4*theta] + Cos[2*theta]*Sin[phi]^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)* (2*Cos[phi]^2*Cos[4*theta] + Cos[2*theta]*Sin[phi]^2) - 2*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - (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)*((-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[phi]*Sin[2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) + (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)*Cos[phi]*Cos[2*theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - (5.*^-13*(-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[phi]*Cos[2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(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)^2*Sin[phi]^2*Sin[theta]* (-Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] + 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)*Cos[phi]*Sin[theta]^3) + 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)^2*Cos[theta]*Sin[phi]^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)*Cos[phi]* (Cos[theta] - 3*Cos[3*theta]) - 2*Sin[theta]* (1 + 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[phi]*Cos[theta]*Sin[theta])) - 2.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 4*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Cos[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])) + 4*Cos[phi]*Cos[2*theta]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[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)/4 - 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)^2*Cos[phi]*Sin[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 + 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)*Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[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)*Cos[theta] - 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)^2*Cos[phi]*(2 + 3*Cos[2*theta])*Sin[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)*(Cos[theta] + 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)*Cos[phi]*(Sin[theta] - 3*Sin[3*theta])) + 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* Cos[phi]*(Sin[theta] - 3*Sin[3*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2 - (1.5*^-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)*Cos[ phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(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)^2*Sin[phi]^2*Sin[theta]* (-Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] + 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)*Cos[phi]*Sin[theta]^3) + 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)^2*Cos[theta]*Sin[phi]^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)*Cos[phi]* (Cos[theta] - 3*Cos[3*theta]) - 2*Sin[theta]* (1 + 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[phi]*Cos[theta]*Sin[theta])) - 2.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 4*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Cos[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])) + 4*Cos[phi]*Cos[2*theta]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[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)/4 - 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)^2*Cos[phi]*Sin[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 + 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)*Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[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)*Cos[theta] - 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)^2*Cos[phi]*(2 + 3*Cos[2*theta])*Sin[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)*(Cos[theta] + 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)*Cos[phi]*(Sin[theta] - 3*Sin[3*theta])) + 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* Cos[phi]*(Sin[theta] - 3*Sin[3*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2 + (6.*^-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)*Cos[ phi]*Sin[2*theta]*(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*Cos[theta]*Sin[phi]^2* Sin[theta] + 6.25*^-8*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)^2*(4*Cos[theta]* Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*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)* (Cos[phi]*Cos[2*theta] - 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)*(4*Cos[theta]*Sin[phi]^2* Sin[theta] + Cos[phi]^2*Sin[4*theta]))))/ (1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - (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)*((-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[phi]^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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (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)*( (-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[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (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)*( (-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[phi]^ 2*Sin[theta]*(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)*Cos[phi]*Sin[2*theta] + 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)*Cos[phi]*Sin[2*theta]))/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (3.9999999999999995*^-18*(-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]*Sin[phi]^2*Sin[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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*( -0.000054*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*Cos[phi]* (1 + 2*Cos[2*theta])*Sin[phi]^2*Sin[theta]^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)^2*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*theta]))/8 - 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*(Cos[theta]*Sin[phi]^2* Sin[theta] - 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)*Cos[phi]* (4*(1 + 2*Cos[2*theta])*Sin[phi]^2*Sin[theta]^2 + 3*Cos[phi]^2*Cos[2*theta]*Sin[2*theta]^2) + Cos[phi]^2* Sin[4*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)^2*(-1.25*^-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)*Cos[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) - 2*(Cos[2*theta] - 3*Cos[4*theta])* Sin[phi]^2) + Sin[phi]^2*Sin[2*theta] + 2*Cos[phi]^2* Sin[4*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)*(4.*^-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[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) + 4*Cos[4*theta]*Sin[phi]^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)*Sin[theta]* (16*Cos[theta]*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)]) + 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)*(9*Sin[phi - 5*theta] + 3*Sin[3*phi - 5*theta] + 17*Sin[phi - 3*theta] - 5*Sin[3*(phi - theta)] + 5*Sin[3*(phi + theta)] - 17*Sin[phi + 3*theta] - 9*Sin[phi + 5*theta] - 3*Sin[3*phi + 5*theta])))/4))/ 8))/(-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))^2)) - 1.*^-6*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r* (3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Sin[theta]^2* ((1.25*^-13*Sin[phi]*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]*Sin[2*theta]))* ((-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)* Cos[phi]*Cos[2*theta]*Csc[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + (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))/4)*Csc[theta]^2* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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)*(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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (2 + 4.*^-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[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[2*theta] - 2.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)*Cos[phi]*Sin[2*theta]))/(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - (2.5*^-13*Sin[phi]* ((-2.5*^-7*(-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)* ((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)*Cos[phi]*Sin[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((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 - 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) + 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))*Cos[phi]*Cos[2*theta]*Csc[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 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) - 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))*Csc[theta]^2* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/r - (5.*^-13*Sin[phi]*(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*Cos[phi]*( -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)*Cos[theta]*Sin[phi]^2* Sin[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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + Cos[phi]*(-4.*^-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[phi]*Cos[2*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)*Sin[2*theta] + 1.*^-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[phi]^2*(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)*Cos[theta]*Sin[theta]^3 + 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)* Sin[4*theta])) - 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)*(-12* ((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)*Sin[phi]^2*Sin[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)*(4*Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2* Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*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)*(12*((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)* Sin[phi]^2*Sin[theta]^2*(-1 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)*((-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[phi]*(4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))*(-((Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(8 - 2.*^-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*Sin[phi]^2*Sin[theta]^2 - 4.3199999999999997*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 7.2*^-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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 4.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + (2.5*^-13*Sin[phi]* ((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)* ((-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* (-((Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/r + (2.5*^-7*Sin[phi]*((1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta] - 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (3.*^-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)*(-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-2.5*^-7*((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)*Cos[phi]*Csc[theta]*Sin[2*theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*((-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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/r + (5.*^-7*Sin[phi]*((1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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]*Sin[phi]^2* Sin[2*theta]*(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)^2* Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (Csc[theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))* (Cos[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)* Cos[phi]*Sin[3*theta] + 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)*Cos[phi]*Sin[3*theta]))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*Sin[phi]^2* (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)*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 - 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*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) + (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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( 2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/r - 5.*^-7*Sin[phi]*((2.5*^-13*((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)*Cos[phi]*Csc[theta]* Sin[2*theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta]))*( -1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]*(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)* Cos[2*theta] + ((-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) + 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)* (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[theta]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + (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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]* Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]*Cos[2*theta]^ 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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)* Sin[2*theta]*(-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)*Cos[phi]* Sin[2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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) + ((-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)*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]*(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)* Cos[2*theta] + ((-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) + 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)* (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[theta]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + (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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]* Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]*Cos[2*theta]^ 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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)* Sin[2*theta]*(-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)*Cos[phi]* Sin[2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2 - (2.5*^-7*((-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)*Cos[phi]*Csc[ theta]*Sin[2*theta]*(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)^2* Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - (2.5*^-7*((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)*Cos[phi]*Csc[theta]* Sin[2*theta]*(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)*(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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]*(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)*Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - (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) + ((-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)*Cos[phi]*(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)*(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[phi]*Cos[2*theta]^ 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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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) + ((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)/2)*( 1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) + (1.*^-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)*Cos[phi]^2*Cos[2*theta]*(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)*Cos[2*theta] + ((-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))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (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)*((-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (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)*( (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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (1.9999999999999998*^-18*(-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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*( -3.75*^-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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^3 + 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*Cos[phi]* (-18*(-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)*Cos[theta]*Sin[phi]^2* Sin[theta]^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)*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(-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 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 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)*(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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))/4 + 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)*(((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2)/4 - 12*(-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)*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)* (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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*(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[phi]^2*Cos[2*theta]^2 + Cos[theta]^2* Sin[phi]^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)* Cos[phi]*(((-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*Cos[theta]^3* Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*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*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))^2) + (5.*^-7*Sin[phi]*((-6.*^-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)*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]^2*Cos[2*theta]^2)/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (5.*^-7*((-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*Cos[2*theta]*Cot[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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (2.*^-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*Sin[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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*((-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[phi]*Cos[2*theta]*Cot[theta]*(-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Csc[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (5.*^-13*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta])*(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)^2* Sin[phi]^2*Sin[theta]*(-Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] + 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)*Cos[phi]*Sin[theta]^3) + 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)^2*Cos[theta]*Sin[phi]^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)*Cos[phi]* (Cos[theta] - 3*Cos[3*theta]) - 2*Sin[theta]* (1 + 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[phi]*Cos[theta]*Sin[theta])) + 4*Cos[phi]* 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)/4 + 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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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)^2*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]) - 2.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 4*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Cos[2*theta]* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[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)*Cos[theta] - 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)^ 2*Cos[phi]*(2 + 3*Cos[2*theta])*Sin[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)* (Cos[theta] + 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)*Cos[phi]* (Sin[theta] - 3*Sin[3*theta])) + 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* Cos[phi]*(Sin[theta] - 3*Sin[3*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2 + (5.*^-7*((-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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])*(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)^2* Sin[phi]^2*Sin[theta]*(-Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] + 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)*Cos[phi]*Sin[theta]^3) + 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)^2*Cos[theta]*Sin[phi]^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)*Cos[phi]* (Cos[theta] - 3*Cos[3*theta]) - 2*Sin[theta]* (1 + 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[phi]*Cos[theta]*Sin[theta])) + 4*Cos[phi]* 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)/4 + 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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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)^2*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]) - 2.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 4*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Cos[2*theta]* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[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)*Cos[theta] - 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)^ 2*Cos[phi]*(2 + 3*Cos[2*theta])*Sin[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)* (Cos[theta] + 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)*Cos[phi]* (Sin[theta] - 3*Sin[3*theta])) + 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* Cos[phi]*(Sin[theta] - 3*Sin[3*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2 + (6.*^-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)*Cos[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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)*Cos[phi]*Sin[2*theta]* (Csc[theta]^2 + 1.*^-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[phi]*Cos[theta]* Sin[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)*Cos[phi]*Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (1.1999999999999998*^-17*((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)*Cos[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta]*(-0.000054*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*(1 + 2*Cos[2*theta])* Sin[phi]^2*Sin[theta]^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)^2*(2*Sin[phi]^2* Sin[2*theta] + Cos[phi]^2*Sin[4*theta]))/8 - 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* (Cos[theta]*Sin[phi]^2*Sin[theta] - 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)*Cos[phi]*(4*(1 + 2*Cos[2*theta])*Sin[phi]^2* Sin[theta]^2 + 3*Cos[phi]^2*Cos[2*theta]*Sin[2*theta]^ 2) + Cos[phi]^2*Sin[4*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)^2* (-1.25*^-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)*Cos[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) - 2*(Cos[2*theta] - 3*Cos[4*theta])* Sin[phi]^2) + Sin[phi]^2*Sin[2*theta] + 2*Cos[phi]^2* Sin[4*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)*(4.*^-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[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[ 6*theta]) + 4*Cos[4*theta]*Sin[phi]^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)*Sin[theta]*(16*Cos[theta]*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)]) + 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)*(9*Sin[phi - 5*theta] + 3*Sin[3*phi - 5*theta] + 17*Sin[phi - 3*theta] - 5*Sin[3*(phi - theta)] + 5*Sin[3*(phi + theta)] - 17*Sin[phi + 3*theta] - 9*Sin[phi + 5*theta] - 3*Sin[3*phi + 5*theta])))/4))/8))/(-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))^2))/ r) + r^2*(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)*Cos[phi]*Sin[2*theta])* ((5.*^-7*(1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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*Cos[phi]*Sin[2*theta]) - 6.*^-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)*( -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[phi]*Cos[2*theta]*( -1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))* (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*Cos[phi]*( -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)*Cos[theta]*Sin[phi]^2* Sin[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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + Cos[phi]*(-4.*^-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[phi]*Cos[2*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)*Sin[2*theta] + 1.*^-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[phi]^2*(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)*Cos[theta]*Sin[theta]^3 + 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)* Sin[4*theta])) - 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)*(-12* ((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)*Sin[phi]^2*Sin[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)*(4*Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2* Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*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)*(12*((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)* Sin[phi]^2*Sin[theta]^2*(-1 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)*((-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[phi]*(4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))))/ (r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2* Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])))* (8 - 2.*^-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*Sin[phi]^2*Sin[theta]^2 - 4.3199999999999997*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 7.2*^-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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 4.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + (6.25*^-14*Csc[theta]* (4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]*Sin[2*theta]))* (0.000072*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*Cos[phi]* Cos[theta]^2 + Cot[theta])*Sin[phi]^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)*Csc[theta]^2* (4 - 2.*^-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[phi]*Cos[theta]*Sin[theta] - 1.*^-6*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)*Cos[phi]* Cos[theta]*Sin[theta])*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta]))/4 + 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)^ 2*(Cos[phi]^2*(Cos[theta] + Cos[3*theta])*Csc[theta] + 6*Cot[theta]*Sin[phi]^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)*Cos[phi]*(12*Cos[theta]^2* Sin[phi]^2 + Cos[phi]^2*Cot[theta]*Sin[4*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)*(-(Cos[phi]* (-1 + Cot[theta]^2)) + 0.000021*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*Cot[theta]*Sin[phi]^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*Cos[phi]* (14*Cos[theta]^2*Sin[phi]^2 + Cos[phi]^2*Cot[theta]* Sin[4*theta])) + 8.*^-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[phi]*( -(Cos[phi]*(Cos[theta] + Cos[3*theta])*Csc[theta]) + 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)*(-4*Cos[theta]^2*Sin[phi]^2 + Cos[2*theta]*Cot[theta]^2* Sin[phi]^2 - Cos[phi]^2*Cot[theta]*Sin[4*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)* (2*Cos[theta]^2*Sin[phi]^2 + Cot[theta]*(-(Cos[2*theta]* Cot[theta]*Sin[phi]^2) + Cos[phi]^2*Sin[4*theta])))))/ (r*(-Csc[theta]^3 + 1.*^-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[phi]^2*Cos[2*theta]^ 2*Csc[theta]^3 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2 + 1.*^-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*Cot[theta]^2*Csc[theta]*Sin[phi]^2 + 4.999999999999999*^-19* (-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*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*(Cos[phi]^2* Cos[2*theta]^2*Cot[theta]*Csc[theta] + Cos[theta]* (-2 + Cot[theta]^2)*Sin[phi]^2) + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^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*(4*Cos[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^2 - 2.*^-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[phi]*Cos[theta]*(Cos[phi]^2*Cos[theta]^2 + Sin[phi]^2)) + 6.*^-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.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)^2*Cos[phi]*Cos[theta]* (Cos[phi]^2*Cos[theta]^2 + Sin[phi]^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)^2*Cos[phi]*Cos[2*theta]* Cot[theta]*Csc[theta]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^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)*(Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2))/2))*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - (2.5*^-7*(1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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*Cos[phi]*Sin[2*theta]) - 6.*^-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)*( -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[phi]*Cos[2*theta]*( -1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))* ((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)* ((-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2* Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))) - (2.5*^-13*(4*Cos[phi]*Cos[2*theta] + 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)*( 2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[2*theta])*(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*Cos[ phi]*Cos[theta]*Sin[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)*(1 - 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)* Cos[phi]*Cos[theta]*Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))* ((-2.5*^-7*(-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)* ((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)*Cos[phi]*Sin[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - (2.5*^-13*Sin[phi]^2*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*Cos[theta]^ 2*Sin[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)* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2* Sin[theta]^2)/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)^2*Cos[theta]*( -1.*^-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]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]*( (-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*(-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 + 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)*Cos[phi]*Sin[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)*Cos[theta]*(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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)*(Cos[phi]* Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*theta])/2))))* ((-2.5*^-7*((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)*Cos[phi]*Csc[theta]*Sin[2*theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*((-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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(1 - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*( -(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - (1.*^-6*(-2.*^-12*(-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)*(-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[phi]^2* Sin[theta]^2 - 7.5*^-7*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(-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)*Cos[phi]*Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^3 - 0.000648* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^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)*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - (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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]))/4 - (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)* (-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]))/4 - ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ 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)*Cos[phi]^2* Sin[2*theta]^2)/2 + 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*(-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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^ 3 + Cos[phi]^2*Sin[2*theta]^3) + 72*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^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)*(-(Sin[phi]^2* Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^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)^2*Cos[phi]* (((-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)*(4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*theta]))/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)*(2*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*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)* (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*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2* Sin[phi]^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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])))*(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*Cos[phi]* (-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)* Cos[theta]*Sin[phi]^2*Sin[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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + Cos[phi]* (-4.*^-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[phi]*Cos[2*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)*Sin[2*theta] + 1.*^-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[phi]^2* (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)*Cos[theta]* Sin[theta]^3 + 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)* Sin[4*theta])) - 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)* (-12*((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)* Sin[phi]^2*Sin[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)*(4*Sin[phi]^2* Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*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)* (12*((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)* Sin[phi]^2*Sin[theta]^2*(-1 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)* ((-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[phi]* (4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]))) + (8 - 2.*^-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*Sin[phi]^2* Sin[theta]^2 - 4.3199999999999997*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 7.2*^-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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 4.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))*( 7.200000000000001*^-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)*(-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)*Cos[phi]* (-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)* Cos[theta]*Sin[phi]^2*Sin[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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + 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*Cos[phi]* (-6*((-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)*Cos[theta]*Sin[phi]^2* Sin[theta]^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*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) - 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)* (-12*((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)* Sin[phi]^2*Sin[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)*(4*Sin[phi]^2* Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])) - 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)*(-12*((-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)*Sin[phi]^2*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)*(4*Sin[phi]^2* Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2))/2 + 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)*((-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[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)* ((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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])) + 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)* (12*((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)* Sin[phi]^2*Sin[theta]^2*(-1 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)* ((-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[phi]* (4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)*(0.000012*((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)*(-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)*Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 12*((-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)*Sin[phi]^2*Sin[theta]^ 2*(-1 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 2.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)* ((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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^ 3 + Cos[phi]^2*Sin[2*theta]^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)*(-2*Sin[phi]^2* Sin[theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 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)*((-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[phi]*(4*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*((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[phi]* (4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta])) + Cos[phi]*(-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)* ((-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[phi]* Cos[2*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)*Sin[2*theta])/ 4) + 1.*^-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[phi]^2* (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)*Cos[theta]* Sin[theta]^3 + 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)*Sin[4*theta]) + 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)* (-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[phi]* Cos[2*theta]^2 + 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)*Sin[phi]^2* (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)*Cos[theta]*Sin[theta]^3 + 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)* Sin[4*theta]))))))/ (-8 + 2.*^-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*Sin[phi]^2*Sin[theta]^2 + 4.3199999999999997*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 + 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 7.2*^-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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 4.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))^ 2 + (6.25*^-14*Csc[theta]*Sin[phi]* ((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* (2.16*^-10*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*Cos[phi]^ 2*Sin[phi]*(Sin[2*theta] + Sin[4*theta]) - 0.000036*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*( -(Cos[2*theta]*Sin[2*phi]) + 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)*Cos[phi]^2*Sin[phi]* (4*Sin[2*theta] + 5*Sin[4*theta]) + 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)* Sin[phi]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*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)*(-8*Cot[theta]*Sin[phi] - 1.*^-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 + 4*Cos[2*theta])*Sin[2*phi] + 2.*^-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] + Cos[3*theta])*Csc[theta]*(Sin[phi] - Sin[3*phi]) + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[phi]*(2*Sin[2*theta] + 3*Sin[4*theta]) + 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)*(2*Cos[2*theta]* Sin[2*phi] - 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)* Sin[phi]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]) + 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[phi]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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)*(8.*^-6*Sin[phi]^3* Sin[2*theta] + 6.*^-6*Cos[phi]^2*Sin[phi]*Sin[ 4*theta]))/4)) + 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)* (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) + r*(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) + (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))*Cos[2*theta]* Sin[2*phi] + 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)^2*((Cos[theta]^2 + Cos[2*theta])*Sin[2*phi] - 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)* Sin[phi]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*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)*(4*Cot[theta]*Sin[phi] + 5.*^-13*(-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*(2 - 2*Cos[2*phi] + 5*Cos[2*(phi - theta)] - 2*Cos[2*theta] + 5*Cos[2*(phi + theta)])*Cot[theta]*Sin[phi] + 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)*(-4*Cos[2*theta]* Sin[2*phi] + 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)* Sin[phi]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta]) - 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[phi]* (4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*theta]))))/4)))/(r*(-Csc[theta]^3 + 1.*^-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[phi]^2*Cos[2*theta]^2*Csc[theta]^3 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2 + 1.*^-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*Cot[theta]^2*Csc[theta]*Sin[phi]^2 + 4.999999999999999*^-19* (-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*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*(Cos[phi]^2* Cos[2*theta]^2*Cot[theta]*Csc[theta] + Cos[theta]* (-2 + Cot[theta]^2)*Sin[phi]^2) + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^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*(4*Cos[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^2 - 2.*^-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[phi]*Cos[theta]*(Cos[phi]^2*Cos[theta]^2 + Sin[phi]^2)) + 6.*^-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.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)^2*Cos[phi]*Cos[theta]* (Cos[phi]^2*Cos[theta]^2 + Sin[phi]^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)^2*Cos[phi]*Cos[2*theta]* Cot[theta]*Csc[theta]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^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)*(Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2))/2))) + (2.5*^-7*(-2.*^-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[phi]*Cos[2*theta]* (4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta])*(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) + (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)*Cos[2*theta]*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + 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)*Cos[2*theta]*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)]) - 8*Cos[phi]*Sin[2*theta] + 0.000024*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*Cos[phi]^2* Sin[2*theta]^2 - 2.*^-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[phi]^2*Sin[2*theta]^ 2)*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) - 5.*^-13*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))*(-0.000216*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*(1 + 2*Cos[2*theta])* Sin[phi]^2*Sin[theta]^2 - 72*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)^2*(Cos[theta]*Sin[phi]^2* Sin[theta] - 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)*Cos[phi]* (4*(1 + 2*Cos[2*theta])*Sin[phi]^2*Sin[theta]^2 + 3*Cos[phi]^2*Cos[2*theta]*Sin[2*theta]^2) + Cos[phi]^2* Sin[4*theta]) - 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)^2*(4*Cos[theta]* Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*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*(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)*Cos[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) - 2*(Cos[2*theta] - 3*Cos[4*theta])* Sin[phi]^2) - 4*(Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*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)*(4.*^-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[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) + 4*Cos[4*theta]*Sin[phi]^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)*Sin[theta]* (16*Cos[theta]*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)]) + 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)*(9*Sin[phi - 5*theta] + 3*Sin[3*phi - 5*theta] + 17*Sin[phi - 3*theta] - 5*Sin[3*(phi - theta)] + 5*Sin[3*(phi + theta)] - 17*Sin[phi + 3*theta] - 9*Sin[phi + 5*theta] - 3*Sin[3*phi + 5*theta])))/4))/ 2)))/(r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))^ 2)))/(Sqrt[2]*r))/2 + ((I*Csc[theta]*(-1.*^-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[phi]* Sin[theta]*(((1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2*Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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* Cos[phi]*Sin[2*theta]) - 6.*^-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)*(-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))* ((-5.*^-7*(-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 + 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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* 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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))))/(2*r*(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta])))) - 5.*^-7*((-5.*^-7*(-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 + 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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( 2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]))))*((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)*(-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) + 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))*Cos[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))) + (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)*Cos[phi]*Sin[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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) + 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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))) + 5.*^-7*((-5.*^-7*(-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 + 1.*^-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[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]* Sin[2*theta])*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( 2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((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)* (-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) + 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))*Cos[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))) + (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)*Cos[phi]*Sin[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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) + 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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))) + (2.5*^-7*(4*Cos[phi]*Cos[2*theta] + 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)* (2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])* (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* Cos[phi]*Cos[theta]*Sin[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)*(1 - 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)*Cos[phi]*Cos[theta]* Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))*((-5.*^-13* (-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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*Cos[2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]*Cos[2*theta]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + ((-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] - 4.*^-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[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (2.*^-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Sin[phi]^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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - 2.5*^-13*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[phi]*Cos[2*theta]* ((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)* ((-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + 1.5*^-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[phi]*Cos[theta]*Sin[theta]* ((-2.5*^-7*(-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)* ((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)*Cos[phi]*Sin[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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) + ((-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)*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + (2.5*^-13*Sin[phi]^2*((2.5*^-7*(-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*Sin[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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)* 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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*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) - (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)*Sin[theta]^2)* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (Cos[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)*Cos[phi]*Sin[3*theta] + 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)*Cos[phi]*Sin[3*theta]))/(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((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 - 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) + 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))*Cos[phi]*Cos[2*theta]*Csc[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 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) - 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))*Csc[theta]^2* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r - (2.5*^-13*Sin[phi]^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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[theta]^2* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Sin[2*theta]*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]* Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* (-((Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r - 5.*^-7*((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)* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]* Sin[2*theta])*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]*(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)* Cos[2*theta] + ((-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) + 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)*(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[theta]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + (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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]* Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]*Cos[2*theta]^ 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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)* Sin[2*theta]*(-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)*Cos[phi]* Sin[2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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)*Cos[phi]*Cos[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]*(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)* Cos[2*theta] + ((-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) + 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)*(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[theta]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + (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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]* Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]*Cos[2*theta]^ 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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)* Sin[2*theta]*(-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)*Cos[phi]* Sin[2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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*(-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))/4 + (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))/4)*Cos[phi]* Sin[2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - ((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 + 1.*^-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[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]* Sin[2*theta])*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]* (2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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) + (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)*Sin[phi]^2*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) + (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)/4)*Cos[phi]*Sin[2*theta]*(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)*Cos[phi]*Sin[2*theta]) + ((-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)*Cos[phi]*Sin[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))/4))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*Cos[phi]*Cos[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]* Sin[2*theta])*(-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) + (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)*Cos[theta]* Sin[phi]^2*Sin[theta] - 5.*^-7*(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) + (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)/4)*Cos[phi]^2* Sin[4*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(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*(-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 + 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) + (-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))*Sin[phi]^2* 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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (2.*^-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)* (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Cos[phi]*Sin[phi]^2*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)*Cos[2*theta] + ((-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))/(-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (2.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (1.9999999999999998*^-18*(-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (-3.75*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]* (6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^3 + 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* Cos[phi]*(-18*(-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)*Cos[theta]*Sin[phi]^2* Sin[theta]^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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/ 4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(-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 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 4.*^-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)*Cos[phi]* (-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))/4 + 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)*(((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2)/4 - 12*(-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)*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)* (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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*(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[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (((-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*Cos[theta]^3* Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*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*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))^2) + 5.*^-7*((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)* (-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) + 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))*Cos[phi]*Cos[2*theta]* (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)*(Cos[phi]^2*Cos[4*theta] + Cos[2*theta]*Sin[phi]^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)* (2*Cos[phi]^2*Cos[4*theta] + Cos[2*theta]*Sin[phi]^2) - 2*Cos[phi]*Sin[2*theta]))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))) - (4.*^-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)*(-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) + 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))*Cos[phi]*Sin[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))) + (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)*Cos[phi]*Cos[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (1.*^-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)*(-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) + 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))*Cos[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(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)^2* Sin[phi]^2*Sin[theta]*(-Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] + 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)*Cos[phi]*Sin[theta]^3) + 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)^2*Cos[theta]*Sin[phi]^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)*Cos[phi]* (Cos[theta] - 3*Cos[3*theta]) - 2*Sin[theta]* (1 + 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[phi]*Cos[theta]*Sin[theta])) + 4*Cos[phi]* 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)/4 + 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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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)^2*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]) - 2.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 4*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Cos[2*theta]* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[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)*Cos[theta] - 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)^ 2*Cos[phi]*(2 + 3*Cos[2*theta])*Sin[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)* (Cos[theta] + 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)*Cos[phi]* (Sin[theta] - 3*Sin[3*theta])) + 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* Cos[phi]*(Sin[theta] - 3*Sin[3*theta]))))/(r* (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^2) - (1.5*^-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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))* (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)^2*Sin[phi]^2*Sin[theta]* (-Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] + 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)*Cos[phi]*Sin[theta]^3) + 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)^2*Cos[theta]*Sin[phi]^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)*Cos[phi]* (Cos[theta] - 3*Cos[3*theta]) - 2*Sin[theta]* (1 + 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[phi]*Cos[theta]*Sin[theta])) + 4*Cos[phi]* 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)/4 + 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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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)^2*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]) - 2.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 4*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Cos[2*theta]* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[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)*Cos[theta] - 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)^ 2*Cos[phi]*(2 + 3*Cos[2*theta])*Sin[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)* (Cos[theta] + 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)*Cos[phi]* (Sin[theta] - 3*Sin[3*theta])) + 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* Cos[phi]*(Sin[theta] - 3*Sin[3*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2 + (6.*^-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)*Cos[phi]*Sin[2*theta]* (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* Cos[theta]*Sin[phi]^2*Sin[theta] + 6.25*^-8* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)^2*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*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)*(Cos[phi]*Cos[2*theta] - 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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (4.*^-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)*(-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) + 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))*Cos[2*theta]* Sin[phi]^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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/(r*(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + (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)* (-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) + 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[phi]^2* Sin[2*theta]*(Csc[theta]^2 + 1.*^-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[phi]*Cos[theta]* Sin[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)*Cos[phi]*Sin[2*theta]))/(r* (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - (3.9999999999999995*^-18*(-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)*(-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) + 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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta]*(-0.000054*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*(1 + 2*Cos[2*theta])* Sin[phi]^2*Sin[theta]^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)^2*(4*Cos[theta]* Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta]))/8 - 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* (Cos[theta]*Sin[phi]^2*Sin[theta] - 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)*Cos[phi]*(4*(1 + 2*Cos[2*theta])*Sin[phi]^2* Sin[theta]^2 + 3*Cos[phi]^2*Cos[2*theta]*Sin[2*theta]^ 2) + Cos[phi]^2*Sin[4*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)^2* (-1.25*^-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)*Cos[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) - 2*(Cos[2*theta] - 3*Cos[4*theta])* Sin[phi]^2) + Sin[phi]^2*Sin[2*theta] + 2*Cos[phi]^2* Sin[4*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)*(4.*^-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[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[ 6*theta]) + 4*Cos[4*theta]*Sin[phi]^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)*Sin[theta]*(16*Cos[theta]*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)]) + 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)*(9*Sin[phi - 5*theta] + 3*Sin[3*phi - 5*theta] + 17*Sin[phi - 3*theta] - 5*Sin[3*(phi - theta)] + 5*Sin[3*(phi + theta)] - 17*Sin[phi + 3*theta] - 9*Sin[phi + 5*theta] - 3*Sin[3*phi + 5*theta])))/4))/8))/(r* (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))^2))) + r^2*Sin[theta]^2* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])*((2.5*^-13*Sin[phi]*(4*Cos[phi]*Cos[2*theta] + 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)* (2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])* (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* Cos[phi]*Cos[theta]*Sin[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)*(1 - 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)*Cos[phi]*Cos[theta]* Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))*((-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)*Cos[phi]*Cos[2*theta]*Csc[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + (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))/4)*Csc[theta]^2* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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)*(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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (2 + 4.*^-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[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[2*theta] - 2.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)*Cos[phi]*Sin[2*theta]))/(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r^2*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - (5.*^-7*Sin[phi]* ((-5.*^-7*(-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 + 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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* 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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]))))*((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 - 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) + 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))*Cos[phi]*Cos[2*theta]* Csc[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 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) - 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))*Csc[theta]^2* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r^2 + (5.*^-7*Sin[phi]*((1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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]*Sin[phi]^2* Sin[2*theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (Csc[theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))*(Cos[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)*Cos[phi]*Sin[3*theta] + 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)*Cos[phi]*Sin[3*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*Sin[phi]^2* (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)*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 - 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*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) + (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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((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 - 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) + 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))*Cos[phi]*Cos[2*theta]*Csc[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 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) - 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))*Csc[theta]^2* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r^2 - 2.5*^-13*((-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[phi]*Cos[2*theta]* Sin[phi]*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]* Sin[2*theta]))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cot[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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + (2.5*^-7*Sin[phi]*(1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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* Cos[phi]*Sin[2*theta]) - 6.*^-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)*(-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))* (-((Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r^2*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta])))) + (2.5*^-13*Sin[phi]* ((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)* (-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) + 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))*Cos[phi]*Cos[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))) + (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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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) + 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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))))*(-((Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r + (2.5*^-7*Sin[phi]*((1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta] - 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (3.*^-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)*(-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* (-((Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r^2 + 1.5*^-12*((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[phi]*Cos[theta]*Sin[phi]* Sin[theta]*((-2.5*^-7*((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)*Cos[phi]*Csc[theta]*Sin[2*theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + ((-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)*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*((-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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - (5.*^-7*Sin[phi]*((Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + r* ((1.*^-6*Csc[theta]*(-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)*Cos[phi]* Sin[2*theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta]))* (-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]*(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)* Cos[2*theta] + ((-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) + 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)* (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[theta]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + (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)*Sin[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]*Cos[2*theta]^ 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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta])) - (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) + (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)/4)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^ 2 + (1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]*(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)* Cos[2*theta] + ((-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) + 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)* (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[theta]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + (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)*Sin[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)*Sin[theta]*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]*Cos[2*theta]^ 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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta])) - (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) + (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)/4)*Cos[phi]*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*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))/4 + (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))/4)*Cos[phi]* Csc[theta]*Sin[2*theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))) - (Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))) - (1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Cos[phi]*(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)* (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[phi]*Cos[2*theta]^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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)* Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))) - ((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*(-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 + 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) + (-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))* (1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[ 2*theta]))) + (6.*^-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)*(-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[phi]^2*Cos[2*theta]*(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)* Cos[2*theta] + ((-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))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))) + (6.*^-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)* (-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[phi]*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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*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)*(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[phi]*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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/(-1 + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))) + (1.1999999999999998*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*Cos[phi]*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)* Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*(-3.75*^-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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^3 + 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* Cos[phi]*(-18*(-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)* Cos[theta]*Sin[phi]^2*Sin[theta]^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)*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^ 3))/4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(-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 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 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)*(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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))/4 + 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)*(((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2)/ 4 - 12*(-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)*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)* (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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*(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[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (((-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*Cos[theta]^3* Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*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*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.25*^-13*(336/(E^(r^2/4)* r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^ 2 + 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^ 3)) + 1.*^-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*(2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^ 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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[ 4*theta])))^2)))/r^2 + (5.*^-7*Sin[phi]* ((2.*^-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 - 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) + 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))*Csc[theta]^4*(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)^3*Cos[phi]*(1 + 2*Cos[2*theta])*Csc[theta]^2*Sin[phi]^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)^2*Csc[theta]^2*(Cos[phi]^2*(Cos[theta] + Cos[3*theta])*Csc[theta] + 2*Cot[theta]*Sin[phi]^2))/ 8 + (-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.25*^-8* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*Csc[theta]^4*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) - 2*(Cos[2*theta] - 3*Cos[4*theta])* Sin[phi]^2) - Csc[theta]^2*(2*Cos[phi]^2*(Cos[theta] + Cos[3*theta])*Csc[theta] + Cot[theta]*Sin[phi]^2)) + 9*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (Csc[theta]^2*(2*Cos[phi]^2*(Cos[theta] + Cos[3*theta])* Csc[theta] + Cot[theta]*Sin[phi]^2) - 1.*^-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[phi]*(3*Cos[phi]^2*Cos[2*theta]*Cot[theta]^2 + (-1 + 3*Cot[theta]^2)*Sin[phi]^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)* (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)^2*Cos[phi]*Csc[theta]^4* (Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) + 4*Cos[4*theta]*Sin[phi]^2) + 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)*Csc[theta]^2* (Cos[phi]^2*(Cos[theta] + Cos[3*theta])*Csc[theta] + 2*Cot[theta]*Sin[phi]^2) - 1.*^-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)^2*Cos[phi]*(3*Cos[phi]^2*Cos[2*theta]*Cot[theta]^ 2 + (-1 + 3*Cot[theta]^2)*Sin[phi]^2)))/4)* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(-Csc[theta]^3 + 1.*^-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[phi]^2*Cos[2*theta]^ 2*Csc[theta]^3 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2 + 1.*^-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*Cot[theta]^2*Csc[theta]* Sin[phi]^2 + 4.999999999999999*^-19*(-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*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*(Cos[phi]^2*Cos[2*theta]^2*Cot[theta]* Csc[theta] + Cos[theta]*(-2 + Cot[theta]^2)*Sin[phi]^ 2) + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^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* (4*Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2 - 2.*^-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[phi]*Cos[theta]* (Cos[phi]^2*Cos[theta]^2 + Sin[phi]^2)) + 6.*^-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.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)^2*Cos[phi]*Cos[theta]*(Cos[phi]^2*Cos[theta]^2 + Sin[phi]^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)^ 2*Cos[phi]*Cos[2*theta]*Cot[theta]*Csc[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^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)*(Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2))/2))^2 + (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 + 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) - 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))*Cos[phi]*Cos[2*theta]* Csc[theta]^2*Sin[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)/4 + 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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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)^2*Cos[phi]*Sin[2*theta]))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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 - 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) + 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))*Cos[phi]*Cos[2*theta]* Cot[theta]*Csc[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (4.*^-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*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3) + 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))*Cos[phi]*Csc[theta]* Sin[2*theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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 + 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) - 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))*Cos[2*theta]* Csc[theta]^2*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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 + 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) - 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))*Cot[theta]* Csc[theta]^2*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (1.*^-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 - 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) + 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))*Cos[phi]*Cos[2*theta]* Csc[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta]))* (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)^2*Sin[phi]^2*Sin[theta]* (-Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] + 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)*Cos[phi]*Sin[theta]^ 3) + 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)^2*Cos[theta]*Sin[phi]^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)* Cos[phi]*(Cos[theta] - 3*Cos[3*theta]) - 2*Sin[theta]* (1 + 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[phi]*Cos[theta]*Sin[theta])) + 4*Cos[phi]* 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)/4 + 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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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)^2*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]) - 2.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 4*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Cos[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])) - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[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)*Cos[theta] - 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)^2*Cos[phi]*(2 + 3*Cos[2*theta])*Sin[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)*(Cos[theta] + 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)*Cos[phi]*(Sin[theta] - 3*Sin[3*theta])) + 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* Cos[phi]*(Sin[theta] - 3*Sin[3*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^2 + (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 - 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) + 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))*Cos[phi]*Cos[2*theta]*Csc[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)*Cos[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)^ 2*Cos[phi]*(2 + 3*Cos[2*theta])*Sin[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)* (Cos[theta] + 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)*Cos[phi]* (Sin[theta] - 3*Sin[3*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)^2* Cos[phi]*(Sin[theta] - 3*Sin[3*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (6.*^-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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (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)* (-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[phi]*Sin[2*theta]*(Csc[theta]^2 + 1.*^-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[phi]*Cos[theta]*Sin[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)*Cos[phi]* Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (1.1999999999999998*^-17*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)*Cos[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta]*(-0.000054*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*(1 + 2*Cos[2*theta])*Sin[phi]^2*Sin[theta]^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)^2*(2*Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]))/8 - 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*(Cos[theta]*Sin[phi]^2* Sin[theta] - 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)*Cos[phi]* (4*(1 + 2*Cos[2*theta])*Sin[phi]^2*Sin[theta]^2 + 3*Cos[phi]^2*Cos[2*theta]*Sin[2*theta]^2) + Cos[phi]^2* Sin[4*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)^ 2*(-1.25*^-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)*Cos[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) - 2*(Cos[2*theta] - 3*Cos[4*theta])* Sin[phi]^2) + Sin[phi]^2*Sin[2*theta] + 2*Cos[phi]^2* Sin[4*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)*(4.*^-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[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[ 6*theta]) + 4*Cos[4*theta]*Sin[phi]^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)*Sin[theta]*(16*Cos[theta]*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)]) + 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)*(9*Sin[phi - 5*theta] + 3*Sin[3*phi - 5*theta] + 17*Sin[phi - 3*theta] - 5*Sin[3*(phi - theta)] + 5*Sin[3*(phi + theta)] - 17*Sin[phi + 3*theta] - 9*Sin[phi + 5*theta] - 3*Sin[3*phi + 5*theta])))/4))/8))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))^2))/r^2) - 1.*^-6*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Sin[theta]^2* (-1/4*(1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2* Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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* Cos[phi]*Sin[2*theta]) - 6.*^-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)*(-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^ 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)* Cos[phi]*Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))^2/(r^2*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2) - (1.*^-6*r*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]*(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)* Cos[2*theta] + ((-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) + 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)* (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[theta]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + (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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]*Cos[2*theta]^ 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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)* Sin[2*theta]*(-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)*Cos[phi]* Sin[2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))*(1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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* Cos[phi]*Sin[2*theta]) - 6.*^-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)*(-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^ 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)* Cos[phi]*Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))*(1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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* Cos[phi]*Sin[2*theta]) - 6.*^-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)*(-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^ 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)* Cos[phi]*Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))) - 1.*^-6*r*(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))*(1.*^-6*(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*(-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 + 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) + (-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))*Sin[phi]^2* Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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* Cos[phi]*Sin[2*theta]) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(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)*(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[theta]^2* Sin[phi]^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)*Cos[phi]*Sin[2*theta])/4 - 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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]^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)* (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) + (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)/4)*Cos[phi]^2* Sin[2*theta]^2) + 1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* Sin[theta]^2*(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)* (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[phi]*Cos[2*theta]*Cot[theta] + 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 + 1.*^-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[phi]*Cos[theta]*Sin[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)* Cos[phi]*Sin[2*theta]) + ((-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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*Cos[phi]*Sin[2*theta]))/ 2) - 6.*^-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)* (-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[phi]*Cos[2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]*Cos[2*theta]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[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)*(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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + ((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))/4 + (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))/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[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)*(-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[phi]*Cos[2*theta]* (-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) + (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)*Cos[theta]* Sin[phi]^2*Sin[theta] - 5.*^-7*(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) + (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)/4)*Cos[phi]^2* Sin[4*theta])))/(2*r^2*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2) - (1.25*^-13*((-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[phi]*Cos[2*theta]* (4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]* Sin[2*theta])))/(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) + (3.*^-12*((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[phi]*Cos[theta]* Sin[theta]*(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* Cos[phi]*(-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)* Cos[theta]*Sin[phi]^2*Sin[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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + Cos[phi]* (-4.*^-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[phi]*Cos[2*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)*Sin[2*theta] + 1.*^-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[phi]^2* (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)*Cos[theta]*Sin[theta]^3 + 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)* Sin[4*theta])) - 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)* (-12*((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)* Sin[phi]^2*Sin[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)*(4*Sin[phi]^2* Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*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)*(12*((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)*Sin[phi]^2*Sin[theta]^2* (-1 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)* ((-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[phi]* (4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]))))/(8 - 2.*^-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*Sin[phi]^2*Sin[theta]^ 2 - 4.3199999999999997*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 7.2*^-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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 4.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) + (1.25*^-13*Csc[theta]*(4*Cos[phi]*Cos[2*theta] + 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)* (2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])* (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* Cos[phi]*Cos[theta]*Sin[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)*(1 - 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)*Cos[phi]*Cos[theta]* Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))*(0.000072* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*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.*^-6*(48/(E^(r^2/4)* r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*Cos[phi]*Cos[theta]^2 + Cot[theta])*Sin[phi]^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)*Csc[theta]^2* (4 - 2.*^-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[phi]*Cos[theta]*Sin[theta] - 1.*^-6*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)*Cos[phi]* Cos[theta]*Sin[theta])*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta]))/4 + 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)^2*(Cos[phi]^2*(Cos[theta] + Cos[3*theta])*Csc[theta] + 6*Cot[theta]*Sin[phi]^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)*Cos[phi]*(12*Cos[theta]^2* Sin[phi]^2 + Cos[phi]^2*Cot[theta]*Sin[4*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)* (-(Cos[phi]*(-1 + Cot[theta]^2)) + 0.000021* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*Cot[theta]* Sin[phi]^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*Cos[phi]*(14*Cos[theta]^2* Sin[phi]^2 + Cos[phi]^2*Cot[theta]*Sin[4*theta])) + 8.*^-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[phi]*(-(Cos[phi]*(Cos[theta] + Cos[3*theta])* Csc[theta]) + 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)*(-4*Cos[theta]^2* Sin[phi]^2 + Cos[2*theta]*Cot[theta]^2*Sin[phi]^2 - Cos[phi]^2*Cot[theta]*Sin[4*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)* (2*Cos[theta]^2*Sin[phi]^2 + Cot[theta]*(-(Cos[2*theta]* Cot[theta]*Sin[phi]^2) + Cos[phi]^2*Sin[4*theta])))))/ (r^2*(-Csc[theta]^3 + 1.*^-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[phi]^2* Cos[2*theta]^2*Csc[theta]^3 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2 + 1.*^-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*Cot[theta]^2* Csc[theta]*Sin[phi]^2 + 4.999999999999999*^-19* (-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* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*(Cos[phi]^2*Cos[2*theta]^2*Cot[theta]*Csc[theta] + Cos[theta]*(-2 + Cot[theta]^2)*Sin[phi]^2) + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^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*(4*Cos[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^2 - 2.*^-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[phi]*Cos[theta]*(Cos[phi]^2*Cos[theta]^2 + Sin[phi]^2)) + 6.*^-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.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)^2*Cos[phi]*Cos[theta]* (Cos[phi]^2*Cos[theta]^2 + Sin[phi]^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)^2*Cos[phi]*Cos[2*theta]* Cot[theta]*Csc[theta]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^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)*(Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2))/2))*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - (5.*^-7*(4*Cos[phi]*Cos[2*theta] + 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)* (2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])* (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* Cos[phi]*Cos[theta]*Sin[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)*(1 - 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)*Cos[phi]*Cos[theta]* Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))*((-5.*^-7* (-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 + 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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2* 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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))))/(r^2*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - (2.5*^-7*(1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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* Cos[phi]*Sin[2*theta]) - 6.*^-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)*(-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))* ((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)* (-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) + 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))*Cos[phi]*Cos[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))) + (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)* Cos[phi]*Sin[2*theta]*(1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2* Sin[theta]^2 - (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)*Cos[phi]* Sin[2*theta])*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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) + 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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))))))/(r*(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta])))) - (2.5*^-13*Sin[phi]^2*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* Cos[theta]^2*Sin[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)* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2* Sin[theta]^2)/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)^2*Cos[theta]* (-1.*^-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]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]* ((-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*(-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 + 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)*Cos[phi]*Sin[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)*Cos[theta]* (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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)* (Cos[phi]*Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*theta])/2))))* (-((Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r^2*(1 - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + (6.25*^-14*Csc[theta]*Sin[phi]* ((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 - 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) + 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))*Cos[phi]*Cos[2*theta]*Csc[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 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) - 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))*Csc[theta]^2* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* (2.16*^-10*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]^2*Sin[phi]*(Sin[2*theta] + Sin[4*theta]) - 0.000036* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*(-(Cos[2*theta]* Sin[2*phi]) + 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)*Cos[phi]^2*Sin[phi]* (4*Sin[2*theta] + 5*Sin[4*theta]) + 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)*Sin[phi]*(Sin[phi]^2* Sin[2*theta] + Cos[phi]^2*Sin[4*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)*(-8*Cot[theta]*Sin[phi] - 1.*^-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 + 4*Cos[2*theta])*Sin[2*phi] + 2.*^-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] + Cos[3*theta])*Csc[theta]*(Sin[phi] - Sin[3*phi]) + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[phi]*(2*Sin[2*theta] + 3*Sin[4*theta]) + 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)* (2*Cos[2*theta]*Sin[2*phi] - 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)* Sin[phi]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]) + 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[phi]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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)*(8.*^-6*Sin[phi]^3* Sin[2*theta] + 6.*^-6*Cos[phi]^2*Sin[phi]*Sin[ 4*theta]))/4)) + 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)* (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) + r*(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) + (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))*Cos[2*theta]* Sin[2*phi] + 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)^2*((Cos[theta]^2 + Cos[2*theta])*Sin[2*phi] - 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)* Sin[phi]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*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)*(4*Cot[theta]*Sin[phi] + 5.*^-13*(-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*(2 - 2*Cos[2*phi] + 5*Cos[2*(phi - theta)] - 2*Cos[2*theta] + 5*Cos[2*(phi + theta)])*Cot[theta]*Sin[phi] + 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)*(-4*Cos[2*theta]* Sin[2*phi] + 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)* Sin[phi]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta]) - 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[phi]* (4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*theta]))))/4)))/(r^2*(-Csc[theta]^3 + 1.*^-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[phi]^2* Cos[2*theta]^2*Csc[theta]^3 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2 + 1.*^-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*Cot[theta]^2* Csc[theta]*Sin[phi]^2 + 4.999999999999999*^-19* (-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* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*(Cos[phi]^2*Cos[2*theta]^2*Cot[theta]*Csc[theta] + Cos[theta]*(-2 + Cot[theta]^2)*Sin[phi]^2) + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^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*(4*Cos[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^2 - 2.*^-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[phi]*Cos[theta]*(Cos[phi]^2*Cos[theta]^2 + Sin[phi]^2)) + 6.*^-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.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)^2*Cos[phi]*Cos[theta]* (Cos[phi]^2*Cos[theta]^2 + Sin[phi]^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)^2*Cos[phi]*Cos[2*theta]* Cot[theta]*Csc[theta]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^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)*(Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2))/2))) + (5.*^-7*(-1.*^-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)))*Cos[phi]* Cos[2*theta]*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) + (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)*Cos[2*theta]*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + 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)* Cos[2*theta]*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)]) - 8*Cos[phi]* Sin[2*theta] + 0.000024*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*Cos[phi]^2*Sin[2*theta]^2 - 2.*^-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[phi]^2*Sin[2*theta]^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) - 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* Cos[phi]*Cos[theta]*Sin[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)* (1 - 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)*Cos[phi]*Cos[theta]* Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))*(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 - 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) - 2.5*^-13* (4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])* (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* Cos[phi]*Cos[theta]*Sin[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)* (1 - 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)*Cos[phi]*Cos[theta]* Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))*(-0.000432* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*(1 + 2*Cos[2*theta])*Sin[phi]^2*Sin[theta]^2 + 72*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (-(Sin[phi]^2*Sin[2*theta]) + 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)*Cos[phi]* (4*(1 + 2*Cos[2*theta])*Sin[phi]^2*Sin[theta]^2 + 3*Cos[phi]^2*Cos[2*theta]*Sin[2*theta]^2) - 2*Cos[phi]^2* Sin[4*theta]) - 4*(((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)^2*(4*Cos[theta]* Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*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*(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)*Cos[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) - 2*(Cos[2*theta] - 3*Cos[4*theta])* Sin[phi]^2) - 4*(Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*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)*(4.*^-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[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) + 4*Cos[4*theta]*Sin[phi]^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)*Sin[theta]* (16*Cos[theta]*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)]) + 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)*(9*Sin[phi - 5*theta] + 3*Sin[3*phi - 5*theta] + 17*Sin[phi - 3*theta] - 5*Sin[3*(phi - theta)] + 5*Sin[3*(phi + theta)] - 17*Sin[phi + 3*theta] - 9*Sin[phi + 5*theta] - 3*Sin[3*phi + 5*theta])))/ 4))))/(r^2*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))^2))))/ (Sqrt[2]*r) - (1.*^-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[phi]*Cos[2*theta]* (((1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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*Cos[phi]*Sin[2*theta]) - 6.*^-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)*( -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[phi]*Cos[2*theta]*( -1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))* ((-5.*^-7*(-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 + 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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( 2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))))/(2*r*(1.*^-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]*Sin[phi]^2*( Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*( 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2* Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))) - 5.*^-7*((-5.*^-7*(-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 + 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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Cos[phi]*Cos[2*theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) + (1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))))* ((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)*( -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) + 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))*Cos[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))) + (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)*Cos[phi]*Sin[2*theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) + (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)*(-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) + 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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))) + 5.*^-7*((-5.*^-7*(-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 + 1.*^-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[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]* Sin[2*theta])*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Cos[phi]*Cos[2*theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) + (1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((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)*( -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) + 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))*Cos[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))) + (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)*Cos[phi]*Sin[2*theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) + (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)*(-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) + 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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))) + (2.5*^-7*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[2*theta])*(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*Cos[ phi]*Cos[theta]*Sin[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)*(1 - 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)* Cos[phi]*Cos[theta]*Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))* ((-5.*^-13*(-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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*Cos[2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + ((-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] - 4.*^-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[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (2.*^-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Sin[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - 2.5*^-13*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[phi]*Cos[2*theta]* ((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)*( (-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[phi]*Cos[2*theta]*( -1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Cos[phi]*Sin[2*theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - (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)*((-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[phi]^2*Sin[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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + 1.5*^-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[phi]*Cos[theta]*Sin[theta]* ((-2.5*^-7*(-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)*( (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)*Cos[phi]*Sin[2*theta]*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Cos[phi]*Cos[2*theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - (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) + ((-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)*Sin[phi]^2*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + (2.5*^-13*Sin[phi]^2*((2.5*^-7*(-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*Sin[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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)* 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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*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) - (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)*Sin[theta]^2)* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Sin[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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (Cos[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)* Cos[phi]*Sin[3*theta] + 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)*Cos[phi]*Sin[3*theta]))/( 2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((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 - 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) + 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))*Cos[phi]*Cos[2*theta]*Csc[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 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) - 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))*Csc[theta]^2* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/r - (2.5*^-13*Sin[phi]^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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[theta]^2*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Sin[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta] - 1.*^-6*r* (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) + (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)/4)*Cos[phi]*Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* (-((Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/r - 5.*^-7*((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)*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]* Sin[2*theta])*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]*(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)* Cos[2*theta] + ((-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) + 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)* (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[theta]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + (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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]* Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]*Cos[2*theta]^ 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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)* Sin[2*theta]*(-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)*Cos[phi]* Sin[2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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)*Cos[phi]*Cos[2*theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]*(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)* Cos[2*theta] + ((-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) + 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)* (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[theta]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + (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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]* Sin[2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]*Cos[2*theta]^ 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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)* Sin[2*theta]*(-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)*Cos[phi]* Sin[2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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*(-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))/4 + (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))/4)*Cos[phi]*Sin[ 2*theta]*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - ((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 + 1.*^-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[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]* Sin[2*theta])*(-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta] + Cos[phi]*Cos[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Cos[phi]*Cos[2*theta]*( 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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) + (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)*Sin[phi]^2*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) + (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)/4)*Cos[phi]*Sin[2*theta]*(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)*Cos[phi]*Sin[2*theta]) + ((-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)*Cos[phi]*Sin[2*theta]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))/4))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) + (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)*Cos[phi]*Cos[2*theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta] + 2.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)*Cos[phi]* Sin[2*theta])*(-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) + (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)*Cos[theta]* Sin[phi]^2*Sin[theta] - 5.*^-7*(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) + (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)/4)*Cos[phi]^2* Sin[4*theta]))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) + (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)*(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*(-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 + 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) + (-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))*Sin[phi]^ 2*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (2.*^-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)*( -336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Cos[phi]*Sin[phi]^2*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)* Cos[2*theta] + ((-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))/(-2 + 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (2.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) - (1.9999999999999998*^-18*(-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)*( -3.75*^-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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^3 + 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*Cos[phi]* (-18*(-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)*Cos[theta]*Sin[phi]^2* Sin[theta]^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)*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(-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 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 4.*^-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)*Cos[phi]* (-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))/4 + 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)*(((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2)/4 - 12*(-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)*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)* (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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*(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[phi]^2*Cos[2*theta]^2 + Cos[theta]^2* Sin[phi]^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)* Cos[phi]*(((-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*Cos[theta]^3* Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*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*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))^2) + 5.*^-7*((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)*( -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) + 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))*Cos[phi]*Cos[2*theta]* (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)*(Cos[phi]^2*Cos[4*theta] + Cos[2*theta]*Sin[phi]^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)* (2*Cos[phi]^2*Cos[4*theta] + Cos[2*theta]*Sin[phi]^2) - 2*Cos[phi]*Sin[2*theta]))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))) - (4.*^-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)*(-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) + 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))*Cos[phi]*Sin[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))) + (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)*Cos[phi]*Cos[2*theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) - (1.*^-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)*(-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) + 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))*Cos[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta]))*(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)^2* Sin[phi]^2*Sin[theta]*(-Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] + 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)*Cos[phi]*Sin[theta]^3) + 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)^2*Cos[theta]*Sin[phi]^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)*Cos[phi]* (Cos[theta] - 3*Cos[3*theta]) - 2*Sin[theta]* (1 + 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[phi]*Cos[theta]*Sin[theta])) + 4*Cos[phi]* 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)/4 + 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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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)^2*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]) - 2.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 4*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Cos[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[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)*Cos[theta] - 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)^ 2*Cos[phi]*(2 + 3*Cos[2*theta])*Sin[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)* (Cos[theta] + 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)*Cos[phi]* (Sin[theta] - 3*Sin[3*theta])) + 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* Cos[phi]*(Sin[theta] - 3*Sin[3*theta]))))/ (r*(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2) - (1.5*^-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)*Cos[phi]*Sin[2*theta]*( 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))*(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)^2*Sin[phi]^2*Sin[theta]* (-Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] + 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)*Cos[phi]*Sin[theta]^3) + 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)^2*Cos[theta]*Sin[phi]^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)*Cos[phi]* (Cos[theta] - 3*Cos[3*theta]) - 2*Sin[theta]* (1 + 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[phi]*Cos[theta]*Sin[theta])) + 4*Cos[phi]* 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)/4 + 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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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)^2*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]) - 2.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 4*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Cos[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[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)*Cos[theta] - 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)^ 2*Cos[phi]*(2 + 3*Cos[2*theta])*Sin[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)* (Cos[theta] + 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)*Cos[phi]* (Sin[theta] - 3*Sin[3*theta])) + 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* Cos[phi]*(Sin[theta] - 3*Sin[3*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2 + (6.*^-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)*Cos[phi]*Sin[2*theta]*( 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* Cos[theta]*Sin[phi]^2*Sin[theta] + 6.25*^-8* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r)^2*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*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)*(Cos[phi]*Cos[2*theta] - 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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*theta]))))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) + (4.*^-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)*(-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) + 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))*Cos[2*theta]*Sin[phi]^ 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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + (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)*( -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) + 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[phi]^2*Sin[ 2*theta]*(Csc[theta]^2 + 1.*^-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[phi]*Cos[theta]* Sin[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)*Cos[phi]*Sin[2*theta]))/ (r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - (3.9999999999999995*^-18*(-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)*(-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) + 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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta]*(-0.000054*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*(1 + 2*Cos[2*theta])* Sin[phi]^2*Sin[theta]^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)^2*(4*Cos[theta]* Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta]))/8 - 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* (Cos[theta]*Sin[phi]^2*Sin[theta] - 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)*Cos[phi]*(4*(1 + 2*Cos[2*theta])*Sin[phi]^2* Sin[theta]^2 + 3*Cos[phi]^2*Cos[2*theta]*Sin[2*theta]^ 2) + Cos[phi]^2*Sin[4*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)^2* (-1.25*^-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)*Cos[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) - 2*(Cos[2*theta] - 3*Cos[4*theta])* Sin[phi]^2) + Sin[phi]^2*Sin[2*theta] + 2*Cos[phi]^2* Sin[4*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)*(4.*^-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[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) + 4*Cos[4*theta]*Sin[phi]^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)*Sin[theta]* (16*Cos[theta]*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)]) + 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)*(9*Sin[phi - 5*theta] + 3*Sin[3*phi - 5*theta] + 17*Sin[phi - 3*theta] - 5*Sin[3*(phi - theta)] + 5*Sin[3*(phi + theta)] - 17*Sin[phi + 3*theta] - 9*Sin[phi + 5*theta] - 3*Sin[3*phi + 5*theta])))/4))/ 8))/(r*(-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 + 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))^ 2))) - 1.*^-6*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r* (3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]*Sin[theta]^2* ((2.5*^-13*Sin[phi]*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[2*theta])*(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*Cos[ phi]*Cos[theta]*Sin[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)*(1 - 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)* Cos[phi]*Cos[theta]*Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))* ((-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)* Cos[phi]*Cos[2*theta]*Csc[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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) + (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))/4)*Csc[theta]^2* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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)*(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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (2 + 4.*^-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[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[2*theta] - 2.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)*Cos[phi]*Sin[2*theta]))/(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r^2*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - (5.*^-7*Sin[phi]* ((-5.*^-7*(-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 + 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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( 2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta]))))*((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 - 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) + 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))*Cos[phi]*Cos[2*theta]* Csc[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 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) - 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))*Csc[theta]^2* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r^2 + (5.*^-7*Sin[phi]*((1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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]*Sin[phi]^2* Sin[2*theta]*(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)^2* Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (Csc[theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))* (Cos[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)* Cos[phi]*Sin[3*theta] + 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)*Cos[phi]*Sin[3*theta]))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*Sin[phi]^2* (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)*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 - 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*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) + (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)*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( 2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* ((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 - 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) + 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))*Cos[phi]*Cos[2*theta]*Csc[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 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) - 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))*Csc[theta]^2* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r^2 - 2.5*^-13*((-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[phi]*Cos[2*theta]* Sin[phi]*((-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)/2)*Cos[phi]*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)*Cos[phi]*Sin[2*theta]))/ (1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Cot[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)*Cos[phi]* Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))/ (1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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)*Cos[phi]*(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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) + (2.5*^-7*Sin[phi]*(1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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*Cos[phi]*Sin[2*theta]) - 6.*^-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)*( -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[phi]*Cos[2*theta]*( -1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))* (-((Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r^2*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2* Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))) + (2.5*^-13*Sin[phi]* ((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)* (-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) + 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))*Cos[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))) + (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)*Cos[phi]*Sin[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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) + 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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))* (-((Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/r + (2.5*^-7*Sin[phi]*((1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - ((2 - 2.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta] - 1.*^-6*r*(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) + (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)/4)*Cos[phi]* Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (3.*^-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)*(-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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* (-((Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ r^2 + 1.5*^-12*((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[phi]*Cos[theta]*Sin[phi]*Sin[theta]* ((-2.5*^-7*((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)*Cos[phi]*Csc[theta]*Sin[2*theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 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) + ((-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)*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[ 2*theta]))) + (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)*((-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[phi]*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)*Cos[phi]*Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))) - (5.*^-7*Sin[phi]*((Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^2* Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + r*((1.*^-6*Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta]))* (-1.*^-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[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]*(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)* Cos[2*theta] + ((-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) + 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)* (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[theta]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + (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)*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]*Sin[ 2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]* Cos[2*theta]^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)*Sin[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)*Cos[phi]*Sin[2*theta]))/ 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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))^ 2 + (1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))*(-1.*^-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[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]* (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)*Cos[2*theta] + ((-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) + 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)*(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[theta]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 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) + (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)*Sin[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]*Sin[ 2*theta])) + Cos[phi]*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]* Cos[2*theta]^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)*Sin[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)*Cos[phi]*Sin[2*theta]))/ 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)*Sin[2*theta]*(-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)*Cos[phi]*Sin[2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*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))/4 + (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))/4)*Cos[phi]* Csc[theta]*Sin[2*theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^ 3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - (Csc[theta]* (-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Cos[theta]* Sin[theta] - 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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - (1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Cos[phi]* (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)*(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[phi]*Cos[2*theta]^ 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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)* Sin[2*theta]*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) - ((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*(-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 + 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) + (-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))* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)* Cos[phi]*Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta]))) + (6.*^-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)* (-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[phi]^2*Cos[2*theta]* (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)*Cos[2*theta] + ((-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))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))) + (6.*^-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)* (-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*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)*(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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/ (-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 1.875*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[2*theta]) + 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* (Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13* (-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta]))) + (1.1999999999999998*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*Cos[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* (-3.75*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]* Cos[theta]*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^3 + 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* Cos[phi]*(-18*(-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)*Cos[theta]*Sin[phi]^2* Sin[theta]^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)*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + ((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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*(-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 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(1 + 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)* Cos[phi]*Cos[theta]*Sin[theta]) - ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(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)* Cos[phi]*Cos[theta]*Sin[theta]))/4 - 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)*(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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))/4 + 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)*(((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2)/ 4 - 12*(-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)*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*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)* (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)*(4*Cos[phi]^3*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*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*(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[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (((-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*Cos[theta]^3* Sin[phi]^2*Sin[theta] - Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] - Sin[phi]^2*Sin[4*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*Cos[phi]^2*Cos[2*theta]^ 2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))))/ (-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*theta]^2 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-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)*Cos[phi]*Sin[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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)* Cos[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) + 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)*(-4*Cos[phi]* Cos[theta]^3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]*Sin[2*phi]* Sin[4*theta])))^2)))/r^2 + (5.*^-7*Sin[phi]*((2.*^-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 - 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) + 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))*Csc[theta]^4* (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)^3* Cos[phi]*(1 + 2*Cos[2*theta])*Csc[theta]^2*Sin[phi]^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)^2*Csc[theta]^2*(Cos[phi]^2*(Cos[theta] + Cos[3*theta])*Csc[theta] + 2*Cot[theta]*Sin[phi]^2))/ 8 + (-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.25*^-8* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*Csc[theta]^4*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) - 2*(Cos[2*theta] - 3*Cos[4*theta])* Sin[phi]^2) - Csc[theta]^2*(2*Cos[phi]^2*(Cos[theta] + Cos[3*theta])*Csc[theta] + Cot[theta]*Sin[phi]^2)) + 9*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (Csc[theta]^2*(2*Cos[phi]^2*(Cos[theta] + Cos[3*theta])* Csc[theta] + Cot[theta]*Sin[phi]^2) - 1.*^-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[phi]*(3*Cos[phi]^2*Cos[2*theta]*Cot[theta]^2 + (-1 + 3*Cot[theta]^2)*Sin[phi]^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)* (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)^2*Cos[phi]*Csc[theta]^4* (Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) + 4*Cos[4*theta]*Sin[phi]^2) + 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)*Csc[theta]^2* (Cos[phi]^2*(Cos[theta] + Cos[3*theta])*Csc[theta] + 2*Cot[theta]*Sin[phi]^2) - 1.*^-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)^2*Cos[phi]* (3*Cos[phi]^2*Cos[2*theta]*Cot[theta]^2 + (-1 + 3*Cot[theta]^2)*Sin[phi]^2)))/4)*Sin[2*theta]* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])))/ (-Csc[theta]^3 + 1.*^-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[phi]^2*Cos[2*theta]^2*Csc[theta]^3 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2 + 1.*^-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* Cot[theta]^2*Csc[theta]*Sin[phi]^2 + 4.999999999999999*^-19* (-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*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]* (Cos[phi]^2*Cos[2*theta]^2*Cot[theta]*Csc[theta] + Cos[theta]*(-2 + Cot[theta]^2)*Sin[phi]^2) + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^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*(4*Cos[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^2 - 2.*^-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[phi]*Cos[theta]*(Cos[phi]^2*Cos[theta]^2 + Sin[phi]^2)) + 6.*^-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.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)^2*Cos[phi]* Cos[theta]*(Cos[phi]^2*Cos[theta]^2 + Sin[phi]^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)^2*Cos[phi]*Cos[2*theta]* Cot[theta]*Csc[theta]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^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)*(Cos[phi]^2* Cos[theta]*Cot[theta] + Csc[theta]*Sin[phi]^2))/2))^ 2 + (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 + 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) - 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))*Cos[phi]*Cos[2*theta]*Csc[theta]^2*Sin[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)/4 + 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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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)^2*Cos[phi]*Sin[2*theta]))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (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 - 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) + 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))*Cos[phi]*Cos[2*theta]* Cot[theta]*Csc[theta]*(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)^2* Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (4.*^-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*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3) + 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))*Cos[phi]*Csc[theta]* Sin[2*theta]*(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)^2* Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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 + 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) - 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))*Cos[2*theta]* Csc[theta]^2*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*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 + 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) - 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))*Cot[theta]* Csc[theta]^2*Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) - (1.*^-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 - 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) + 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))*Cos[phi]*Cos[2*theta]* Csc[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta]))* (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)^2*Sin[phi]^2*Sin[theta]* (-Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] + 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)*Cos[phi]*Sin[theta]^3) + 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)^2*Cos[theta]*Sin[phi]^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)*Cos[phi]* (Cos[theta] - 3*Cos[3*theta]) - 2*Sin[theta]* (1 + 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[phi]*Cos[theta]*Sin[theta])) + 4*Cos[phi]* 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)/4 + 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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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)^2*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]) - 2.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) - 4*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Cos[2*theta]* (1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[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)*Cos[theta] - 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)^ 2*Cos[phi]*(2 + 3*Cos[2*theta])*Sin[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)* (Cos[theta] + 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)*Cos[phi]* (Sin[theta] - 3*Sin[3*theta])) + 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* Cos[phi]*(Sin[theta] - 3*Sin[3*theta]))))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2 + (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 - 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) + 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))*Cos[phi]*Cos[2*theta]* Csc[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)*Cos[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)^2* Cos[phi]*(2 + 3*Cos[2*theta])*Sin[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)* (Cos[theta] + 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)*Cos[phi]*(Sin[theta] - 3*Sin[3*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)^2*Cos[phi]*(Sin[theta] - 3*Sin[3*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (6.*^-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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (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)* (-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[phi]*Sin[2*theta]* (Csc[theta]^2 + 1.*^-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[phi]*Cos[theta]* Sin[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)*Cos[phi]*Sin[2*theta]))/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))) + (1.1999999999999998*^-17*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)*Cos[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta]*(-0.000054*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*(1 + 2*Cos[2*theta])* Sin[phi]^2*Sin[theta]^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)^2*(2*Sin[phi]^2* Sin[2*theta] + Cos[phi]^2*Sin[4*theta]))/8 - 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* (Cos[theta]*Sin[phi]^2*Sin[theta] - 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)*Cos[phi]*(4*(1 + 2*Cos[2*theta])*Sin[phi]^2* Sin[theta]^2 + 3*Cos[phi]^2*Cos[2*theta]*Sin[2*theta]^ 2) + Cos[phi]^2*Sin[4*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)^2* (-1.25*^-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)*Cos[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) - 2*(Cos[2*theta] - 3*Cos[4*theta])* Sin[phi]^2) + Sin[phi]^2*Sin[2*theta] + 2*Cos[phi]^2* Sin[4*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)*(4.*^-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[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[ 6*theta]) + 4*Cos[4*theta]*Sin[phi]^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)*Sin[theta]*(16*Cos[theta]*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)]) + 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)*(9*Sin[phi - 5*theta] + 3*Sin[3*phi - 5*theta] + 17*Sin[phi - 3*theta] - 5*Sin[3*(phi - theta)] + 5*Sin[3*(phi + theta)] - 17*Sin[phi + 3*theta] - 9*Sin[phi + 5*theta] - 3*Sin[3*phi + 5*theta])))/4))/8))/(-2 + 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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* Cos[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 3.75*^-13* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2* (-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))^2))/ r^2) + r^2*(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)*Cos[phi]*Sin[2*theta])* (-1/4*(1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2*Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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* Cos[phi]*Sin[2*theta]) - 6.*^-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)*(-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))^2/ (r^2*(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))^2) - (1.*^-6*r*(-1.*^-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[phi]*Cos[theta]*Sin[phi]^2*Sin[theta]* (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)*Cos[2*theta] + ((-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) + 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)* (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[theta]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 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) + (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)*Sin[phi]^2*Sin[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)* (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[phi]*(Cos[theta] + Cos[3*theta]) + ((-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]* (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)* Cos[phi]*Sin[2*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)* Sin[theta]*(1 + 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)*Cos[phi]*Sin[2*theta] - 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)*Cos[phi]*Sin[2*theta])) + Cos[phi]* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(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)*(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[phi]*Cos[2*theta]^ 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)*Sin[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)* Cos[phi]*Sin[2*theta]))/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)* Sin[2*theta]*(-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)*Cos[phi]*Sin[ 2*theta])) - (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) + (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)/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))*(1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2*Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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* Cos[phi]*Sin[2*theta]) - 6.*^-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)*(-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))) + (1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])))* (1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/ r + r*(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) + (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))*Sin[phi]^2*Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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* Cos[phi]*Sin[2*theta]) - 6.*^-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)*(-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta]))) - 1.*^-6*r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])))* (1.*^-6*(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*(-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 + 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) + (-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))*Sin[phi]^2* Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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* Cos[phi]*Sin[2*theta]) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])* (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)*(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[theta]^2* Sin[phi]^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)*Cos[phi]* Sin[2*theta])/4 - 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)* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]^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)*(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) + (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)/4)*Cos[phi]^2* Sin[2*theta]^2) + 1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*Sin[theta]^2* (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)*(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[phi]*Cos[2*theta]* Cot[theta] + 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 + 1.*^-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[phi]*Cos[theta]*Sin[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)*Cos[phi]* Sin[2*theta]) + ((-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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*Cos[phi]*Sin[2*theta]))/ 2) - 6.*^-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)* (-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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[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)*(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[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + ((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))/4 + (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))/4)*Cos[phi]* Sin[2*theta]*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[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)*(-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[phi]*Cos[2*theta]* (-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) + (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)*Cos[theta]*Sin[phi]^2*Sin[theta] - 5.*^-7*(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) + (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)/4)*Cos[phi]^2*Sin[4*theta])))/ (2*r^2*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]*Sin[2*theta])))^ 2) - (1.25*^-13*((-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[phi]*Cos[2*theta]* (4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[2*theta])*(-6.*^-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)*Cos[phi]*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)*Cos[phi]*Sin[2*theta])))/ (2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[ 2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)* Cos[phi]*(-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]))) + (3.*^-12*((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[phi]*Cos[theta]*Sin[theta]*(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*Cos[phi]*( -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)*Cos[theta]*Sin[phi]^2* Sin[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)*(4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3))/4) + Cos[phi]*(-4.*^-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[phi]*Cos[2*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)*Sin[2*theta] + 1.*^-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[phi]^2*(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)*Cos[theta]*Sin[theta]^3 + 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)* Sin[4*theta])) - 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)*(-12* ((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)*Sin[phi]^2*Sin[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)*(4*Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2* Sin[2*theta]^2))/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)*((-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[phi]*(2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*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)*(12*((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)* Sin[phi]^2*Sin[theta]^2*(-1 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - ((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*Sin[phi]^2*Sin[theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 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)*((-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[phi]*(4*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))))/ (8 - 2.*^-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*Sin[phi]^2*Sin[theta]^2 - 4.3199999999999997*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 - 1.5*^-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)*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r)*(6 - 2*Cos[2*phi] + Cos[ 2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 7.2*^-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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 4.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta]) - 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)* Cos[phi]*(-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]))) + (1.25*^-13*Csc[theta]* (4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[2*theta])*(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*Cos[ phi]*Cos[theta]*Sin[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)*(1 - 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)* Cos[phi]*Cos[theta]*Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))* (0.000072*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*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.*^-6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*Cos[phi]* Cos[theta]^2 + Cot[theta])*Sin[phi]^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)*Csc[theta]^2* (4 - 2.*^-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[phi]*Cos[theta]*Sin[theta] - 1.*^-6*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)*Cos[phi]* Cos[theta]*Sin[theta])*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta]))/4 + 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)^ 2*(Cos[phi]^2*(Cos[theta] + Cos[3*theta])*Csc[theta] + 6*Cot[theta]*Sin[phi]^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)*Cos[phi]*(12*Cos[theta]^2* Sin[phi]^2 + Cos[phi]^2*Cot[theta]*Sin[4*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)*(-(Cos[phi]* (-1 + Cot[theta]^2)) + 0.000021*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/r^3)*Cot[theta]*Sin[phi]^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*Cos[phi]* (14*Cos[theta]^2*Sin[phi]^2 + Cos[phi]^2*Cot[theta]* Sin[4*theta])) + 8.*^-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[phi]*( -(Cos[phi]*(Cos[theta] + Cos[3*theta])*Csc[theta]) + 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)*(-4*Cos[theta]^2*Sin[phi]^2 + Cos[2*theta]*Cot[theta]^2* Sin[phi]^2 - Cos[phi]^2*Cot[theta]*Sin[4*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)* (2*Cos[theta]^2*Sin[phi]^2 + Cot[theta]*(-(Cos[2*theta]* Cot[theta]*Sin[phi]^2) + Cos[phi]^2*Sin[4*theta])))))/ (r^2*(-Csc[theta]^3 + 1.*^-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[phi]^2*Cos[2*theta]^ 2*Csc[theta]^3 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2 + 1.*^-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*Cot[theta]^2*Csc[theta]*Sin[phi]^2 + 4.999999999999999*^-19* (-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*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*(Cos[phi]^2* Cos[2*theta]^2*Cot[theta]*Csc[theta] + Cos[theta]* (-2 + Cot[theta]^2)*Sin[phi]^2) + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^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*(4*Cos[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^2 - 2.*^-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[phi]*Cos[theta]*(Cos[phi]^2*Cos[theta]^2 + Sin[phi]^2)) + 6.*^-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.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)^2*Cos[phi]*Cos[theta]* (Cos[phi]^2*Cos[theta]^2 + Sin[phi]^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)^2*Cos[phi]*Cos[2*theta]* Cot[theta]*Csc[theta]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^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)*(Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2))/2))*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - (5.*^-7*(4*Cos[phi]*Cos[2*theta] + 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)*( 2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[2*theta])*(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*Cos[ phi]*Cos[theta]*Sin[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)*(1 - 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)* Cos[phi]*Cos[theta]*Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))* ((-5.*^-7*(-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 + 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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]*Sin[2*theta])*(-1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*Cos[phi]*Cos[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (1.*^-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)*(-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(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) - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( 2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]*(-2*Cos[theta]^3*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*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)*Cos[phi]*(2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))))/(r^2*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta]) - 1.25*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*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*(-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]* (8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2* Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) - (2.5*^-7*(1.*^-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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*Sin[phi]^2*Sin[theta]^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)/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)^2*Cos[phi]*Cos[2*theta]* Cot[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 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 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*Cos[phi]*Sin[2*theta]) - 6.*^-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)*( -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[phi]*Cos[2*theta]*( -1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])) + (-2 + 1.*^-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[phi]*Cos[theta]* Sin[theta] + 2.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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^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)*Cos[phi]*Sin[2*theta])* (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))* ((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)* (-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) + 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))*Cos[phi]*Cos[2*theta]* (-1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta] + Cos[phi]* Cos[2*theta]*(1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]* Sin[2*theta])))/(r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]* Cos[2*theta]*Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))) + (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)*Cos[phi]*Sin[2*theta]* (1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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*Sin[phi]^2*Sin[theta]^2 - (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)*Cos[phi]*Sin[2*theta])*(1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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) + 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[phi]^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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(r*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^ 2 - 1.0799999999999999*^-16*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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* (-(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))))/ (r*(1.*^-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]*Sin[phi]^2*(Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2* Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta])))) - (2.5*^-13*Sin[phi]^2*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*Cos[theta]^ 2*Sin[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)* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2) + (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)*Cos[phi]^2* Sin[theta]^2)/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)^2*Cos[theta]*( -1.*^-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]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)* Sin[theta] - 2*(Cos[phi]*Cos[2*theta] + 2.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)*Cos[theta]* (Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta]) + 7.5*^-7*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 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta]) + r*Sin[theta]*( (-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*(-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 + 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)*Cos[phi]*Sin[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)*Cos[theta]*(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)^2*Cos[theta]* (2*Cos[phi]^2*Cos[2*theta] + Sin[phi]^2)*Sin[theta] + r*Cos[phi]*Sin[theta]^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)/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 + 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)*Cos[phi]*Sin[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)*(Cos[phi]* Cos[2*theta] + 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)*(Sin[phi]^2* Sin[2*theta] + (Cos[phi]^2*Sin[4*theta])/2))))* (-((Csc[theta]*(-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)*Cos[phi]*Sin[2*theta] + 2.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)*Cos[phi]* Sin[2*theta])*(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)^ 2*Cos[phi]*Cos[theta]*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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/ (1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)* Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6* (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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 6*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2))/2))/r + r*(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) + (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))*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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)*(-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[phi]*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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2))/( -1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 + 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta])))))/ (r^2*(1 - 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 5.3999999999999996*^-17* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^ 2*Sin[theta]^3 - 6.25*^-14*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[2*theta]^2 - 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])* Sin[theta]^2*(-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)*Cos[phi]*Sin[2*theta]) + 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*( -(Sin[phi]^2*Sin[theta]^2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[ 4*theta])))) + (6.25*^-14*Csc[theta]*Sin[phi]* ((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 - 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) + 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))*Cos[phi]*Cos[2*theta]*Csc[theta]* (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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])))/( 1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[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 + 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) - 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))*Csc[theta]^2* Sin[2*theta]*(1.*^-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[phi]^2*Cos[2*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)*Cos[phi]*Sin[2*theta])* (-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)*Cos[phi]*Sin[2*theta])))/(1.*^-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]*Sin[phi]^2* (Cos[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)*Cos[phi]*Cos[2*theta]* Sin[theta] - 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)*Cos[phi]*Sin[theta]^3) - 1.*^-12*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]*(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)^2*Cos[phi]*Cos[theta]* 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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[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)*Cos[phi]*Sin[2*theta])) + (1 - 1.*^-6*(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) + (-336/(E^(r^2/4)*r^4) + (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 - (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 + (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 - ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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)*Cos[phi]*Sin[2*theta])*(1.*^-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[phi]^2*Cos[2*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)* Cos[phi]*Sin[2*theta])*(-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)*Cos[phi]* Sin[2*theta]))) + (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)*(-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[phi]* (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)*Cos[phi]* Cos[2*theta] - Cot[theta] + 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)*Cos[phi]*Sin[theta]^2)* Sin[2*theta])/(-1 + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2* Sin[theta]^2 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2* Sin[theta]^3 + 1.875*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) + 6.25*^-14* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*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*(Sin[phi]^2*Sin[theta]^2 + Cos[phi]^2*Sin[2*theta]^2 - 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)*Cos[phi]*(8*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 5.*^-13*(-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* (2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) + 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)*(-4*Cos[phi]*Cos[theta]^ 3*Sin[phi]^2*Sin[theta] + 2*Cos[phi]^3*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]*Sin[2*phi]*Sin[4*theta]))))* (2.16*^-10*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-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*Cos[phi]^ 2*Sin[phi]*(Sin[2*theta] + Sin[4*theta]) - 0.000036*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2*( -(Cos[2*theta]*Sin[2*phi]) + 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)*Cos[phi]^2*Sin[phi]* (4*Sin[2*theta] + 5*Sin[4*theta]) + 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)* Sin[phi]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*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)*(-8*Cot[theta]*Sin[phi] - 1.*^-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 + 4*Cos[2*theta])*Sin[2*phi] + 2.*^-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] + Cos[3*theta])*Csc[theta]*(Sin[phi] - Sin[3*phi]) + 2.5*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[phi]*(2*Sin[2*theta] + 3*Sin[4*theta]) + 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)*(2*Cos[2*theta]* Sin[2*phi] - 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)* Sin[phi]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2* Sin[4*theta]) + 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[phi]*(Sin[phi]^2*Sin[2*theta] + Cos[phi]^2*Sin[4*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)*(8.*^-6*Sin[phi]^3* Sin[2*theta] + 6.*^-6*Cos[phi]^2*Sin[phi]*Sin[ 4*theta]))/4)) + 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)* (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) + r*(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) + (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))*Cos[2*theta]* Sin[2*phi] + 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)^2*((Cos[theta]^2 + Cos[2*theta])*Sin[2*phi] - 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)* Sin[phi]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*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)*(4*Cot[theta]*Sin[phi] + 5.*^-13*(-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*(2 - 2*Cos[2*phi] + 5*Cos[2*(phi - theta)] - 2*Cos[2*theta] + 5*Cos[2*(phi + theta)])*Cot[theta]*Sin[phi] + 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)*(-4*Cos[2*theta]* Sin[2*phi] + 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)* Sin[phi]*(4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*theta]) - 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[phi]* (4*Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2* Sin[4*theta]))))/4)))/(r^2*(-Csc[theta]^3 + 1.*^-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[phi]^2*Cos[2*theta]^2*Csc[theta]^3 + 5.3999999999999996*^-17*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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*Cos[phi]*Cos[theta]*Sin[phi]^2 + 1.*^-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*Cot[theta]^2*Csc[theta]*Sin[phi]^2 + 4.999999999999999*^-19* (-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*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(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[phi]*(Cos[phi]^2* Cos[2*theta]^2*Cot[theta]*Csc[theta] + Cos[theta]* (-2 + Cot[theta]^2)*Sin[phi]^2) + 2.5*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^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*(4*Cos[phi]^2*Cos[theta]* Cot[theta] + Csc[theta]*Sin[phi]^2 - 2.*^-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[phi]*Cos[theta]*(Cos[phi]^2*Cos[theta]^2 + Sin[phi]^2)) + 6.*^-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.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)^2*Cos[phi]*Cos[theta]* (Cos[phi]^2*Cos[theta]^2 + Sin[phi]^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)^2*Cos[phi]*Cos[2*theta]* Cot[theta]*Csc[theta]*(Cos[phi]^2*Cos[2*theta] + Sin[phi]^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)*(Cos[phi]^2*Cos[theta]*Cot[theta] + Csc[theta]* Sin[phi]^2))/2))) + (5.*^-7*(-1.*^-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)))*Cos[phi]*Cos[2*theta]*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) + (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)*Cos[2*theta]*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + 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)*Cos[2*theta]*(1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)]) - 8*Cos[phi]*Sin[2*theta] + 0.000024*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)*Cos[phi]^2* Sin[2*theta]^2 - 2.*^-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[phi]^2*Sin[2*theta]^ 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) - 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* Cos[phi]*Cos[theta]*Sin[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)*(1 - 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)*Cos[phi]*Cos[theta]* Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))*(2 - 5.*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[ 2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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*(-2*(Cos[phi]^2* Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]*(-4*Cos[theta]* Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2*Cos[2*theta]^2* Sin[2*theta] + Sin[phi]^2*Sin[4*theta]))) - 2.5*^-13*(4*Cos[phi]*Cos[2*theta] + 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)*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[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)* (1 - Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[2*theta])*( 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* Cos[phi]*Cos[theta]*Sin[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)*(1 - 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)*Cos[phi]*Cos[theta]* Sin[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 + 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)*Cos[phi]*Sin[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)*Cos[phi]*Sin[2*theta]))*(-0.000432* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*(1 + 2*Cos[2*theta])*Sin[phi]^2*Sin[theta]^2 + 72*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + ((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/r^3)^2* (-(Sin[phi]^2*Sin[2*theta]) + 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)*Cos[phi]* (4*(1 + 2*Cos[2*theta])*Sin[phi]^2*Sin[theta]^2 + 3*Cos[phi]^2*Cos[2*theta]*Sin[2*theta]^2) - 2*Cos[phi]^2* Sin[4*theta]) - 4*(((336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))) + 16*r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2)))/ r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))))/2))/2))/r)^2*(4*Cos[theta]* Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*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*(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)*Cos[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) - 2*(Cos[2*theta] - 3*Cos[4*theta])* Sin[phi]^2) - 4*(Cos[theta]*Sin[phi]^2*Sin[theta] + Cos[phi]^2*Sin[4*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)*(4.*^-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[phi]*(Cos[phi]^2*(Cos[2*theta] + 3*Cos[6*theta]) + 4*Cos[4*theta]*Sin[phi]^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)*Sin[theta]* (16*Cos[theta]*(2 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)]) + 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)*(9*Sin[phi - 5*theta] + 3*Sin[3*phi - 5*theta] + 17*Sin[phi - 3*theta] - 5*Sin[3*(phi - theta)] + 5*Sin[3*(phi + theta)] - 17*Sin[phi + 3*theta] - 9*Sin[phi + 5*theta] - 3*Sin[3*phi + 5*theta])))/4))))/ (r^2*(2 - 5.*^-13*(336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[theta]^2 - 1.0799999999999999*^-16* (48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/ r^4 + ((-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*Cos[phi]*Cos[theta]* Sin[phi]^2*Sin[theta]^3 - 3.75*^-13*(48/(E^(r^2/4)*r^4) - (3*(16/E^(r^2/4) - (8*r^2)/E^(r^2/4)))/r^4 + ((-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)*(6 - 2*Cos[2*phi] + Cos[2*(phi - theta)] + 2*Cos[2*theta] + Cos[2*(phi + theta)])*Sin[theta]^2*(-2 + 1.*^-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[phi]*Cos[theta]*Sin[theta]) - 1.25*^-13* (336/(E^(r^2/4)*r^4) - (21*(16/E^(r^2/4) - (8*r^2)/ E^(r^2/4)))/r^4 + (9*((-16*r)/E^(r^2/4) + 16*r* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4)))))/r^3 - (2*(-16/E^(r^2/4) + (8*r^2)/E^(r^2/4) + 16* (-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 16*r* (r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2)))/r^2 + ((16*r)/E^(r^2/4) - 16*r*(-1/2*1/E^(r^2/4) + r^2/(4*E^(r^2/4))) + 32*(r/(2*E^(r^2/4)) - (r*(-1/2*1/E^(r^2/4) + r^2/ (4*E^(r^2/4))))/2) + 16*r*(3/(4*E^(r^2/4)) - (3*r^2)/(8*E^(r^2/4)) - (r*(r/(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[phi]^2*Sin[2*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*(-(Sin[phi]^2*Sin[theta]^ 2) - Cos[phi]^2*Sin[2*theta]^2 + 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)*Cos[phi]*(8*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + Cos[phi]^2*Sin[2*theta]^3)) + 1.*^-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* (-2*(Cos[phi]^2*Cos[2*theta]^2 + Cos[theta]^2*Sin[phi]^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)*Cos[phi]* (2*Cos[phi]^2*Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2* Sin[4*theta]) - 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)*Cos[phi]* (-4*Cos[theta]*Sin[phi]^2*Sin[theta]^3 + 2*Cos[phi]^2* Cos[2*theta]^2*Sin[2*theta] + Sin[phi]^2*Sin[4*theta])))^ 2)))/(Sqrt[2]*r))/2)/(Sqrt[2]*r))/2